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| ne reste dans les kiosques que 

deux revues consacrées à l'Ams- 
trad. CPC Infos est désormais le seul 
à parution mensuelle. Or, la presse 
dédiée est frappée de plein fouet 
par l'environnement même si le lec- 
torat reste pratiquement le même 
depuis plusieurs mois. 


@La publicité, qui permet à une re- 
vue de vivre, est quasi-inexistante 
sur Amstrad. 


@la commission paritaire, permet 
une diminution des coûts et des frais 
postaux. Elle nous a été refusée par 
décision signifiée en septembre. 


@Les coûts d'envoi aux abonnés 
sont particulièrement élevés. 
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XYPHOES FANTASY (SILMARILS) 


Que faire pour que les Amstradistes 
continuent d'avoir Un mensuel digne 
de ce nom ? Prendre la décision de 
modifier les prix tout en restant au 
plus juste. C'est ce que je viens de 
décider tant sur le prix de l'abonne- 
ment. Ce dernier, augmenté du 
port, ne devant servir à mon avis, 
qu'aux lecteurs loin des points de 
vente. 


Toute l'équipe vous remercie de 
votre compréhension. 


S. FAUREZ 
Directeur de publication 
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SILMARILS 


Comme annoncé en couverture (c'est 
assez voyant, non ?) Xyphoes Fantasy est 
déjà sorti sur nos CPC (uniquement). Eh 
oui, pour une fois les vilains 16/32 bits 
comme les Amiga et les Atari n'auront 
pas le privilège de voir ce logiciel dans 
leurs lecteurs respectifs. 

Il s'agit d'un programme pur CPC, 
programmé par des passionnés. D'ailleurs 
vous les connaissez certainement déjà : 
Fablen Fessard (dit Féfesse) à la program- 
mation, en collaboration avec Mickael 
Fauquet, le scénario (hum !) et les gra- 
phismes sont réalisés par l'innénarable 
Stéphane St Martin. N'oublions pas la 
musique, ayant pour géniteurs Emmanuel 
Lary et Fabrice Hautecloque. 

Le jeu se divise en 3 niveaux pendant 
lesquels, les armes à la main, vous com- 
battrez des bestioles toutes plus Invrai- 
semblables les unes que les autres (il faut arrêter le mezcal 
Stéphane, ça détruit les synapses). Entre chacun de ces 
niveaux, vous serez confronté à Un adversaire dans un duel 
à l'épée plutôt sanglant et fleurant bon le «Barbarian». 

Dit comme cela, le jeu peu sembler classique mais l'origi- 
nalité réside ailleurs. 

Tout d'abord la disquette du jeu ne contient pas moins 
de 780 Ko. Pour faire tenir Un tel nombre de données sur une 
disquette, || a fallu utiliser les services d'un Atari ST qui a 
compacté les données de manière très efficace. Les routines 
de décompactage ont ensuite été intégrées pour bénéficier 
d'un temps de chargement relativement court. 

Tous les écrans de présentation ainsi que le tableau des 
scores sont en overscan. Mais vous trouverez aussi des sé- 
quences (le duel inter-niveaux) animées sur un fond en 
overscan ce qui est une première pour un jeu sur CPC. 

Les sprites sont de taille conséquente et ne clignotent 
pas, tout comme le scrolling qui, blen qu'un peu saccadé, 
ne ralenti jamais malgré la présence de nombreux objets à 
l'écran. 

Enfin, la musique et les bruitages bénéficient des mêmes 
performances techniques, car on retrouve des musiques ve- 
nant d’Atari où d'Amiga (Soundtracker). 


ACTUALITE 





Légendes : 

1. À cheval, 
pour le 
deuxième 
niveau. 

2. Le duel 

en overscan. 
3. Le troisième 
niveau. 





LANKHOR 


On commence avec deux nou- 
velles compilations du spécialiste du 
jeu d'aventure : Epopées 1 et Epo- 
pées 2 regroupent les meilleurs logi- 
ciels du genre. Dans le volume 1, 
on trouve le célébrissime Mortville 
Manor, secondé par les plus récents 
Alive et Sdaw. Pour 249 F le mor- 
ceqau, ne vous privez pas du plaisir 
d'entendre votre CPC parler (dans 
Mortville Manor). Le volume 2 est 
composé de deux logiciels, le Fugi- 
tif et la Secte Noire. Le premier est 
du style science-fiction et couvre 
plusieurs planètes, le second vous 
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che 8 Décembre pour courir au 
Salon Supergames Show (Espa- 
ce Champerret à Paris). 

Les passionnés de jeu et les 
autres y trouveront de nombreux 
éditeurs venus présenter leurs 


plonge dans la quête d'un grimoire 
disparu qui lévera la malédiction du 
bourg d'Isségeac. Dernière produc- 
tion en date de Lankhor : La Malé- 
diction. Il s’agit d'un shoot'em up... 
Non, attendez je crois qu'il y a une 
petite erreur, il s’agit d'un jeu 
d'aventure pur jus comprenant une 
sombre histoire de magie et de sor- 
cellerie. En fait, vous apprendrez 
qu'il n'en est rien et que des extra- 
terrestres se sont écrasés sur notre 
planète et puis ont disparus. Le jeu 
comporte 3 parties, vous pouvez 
commencer par celle que vous 
voulez en gardant à l'esprit que les 
indices nécessaires se trouvent tou- 
jours dans la partie précédente. 


" 
nouveaux produits. | 
Amstrad et Atari seront pré- I 

sents et proposerons des ani- 
mations sur leurs stands, sous | 
forme de championnats dotés | 
de nombreux prix. I 
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LORICIEL 


Les compils ça marche toujours, 
la preuve : Loriciel nous présente 
pas moins de 2 compilations ce 
mois-ci. 


Avec Top 3, vous aurez la joie 
de découvrir réunis trois logiciels as- 
sez célèbres et plutôt réussis : Pin- 
ball Magic, Tennis Cup et Moon- 
blaster. Cette compilation est nom- 
mée : la compil extrême. Pourquoi 
donc ? Ben, je n'en sais rien en fait, 
c'était juste histoire de remplir quel- 
ques lignes. 


La seconde compilations est or- 
née de plein de petites étoiles do- 
rées ce qui tombe bien puisqu'elle 
est intitulée : les Stars | 


On y voit effectivement les deux 
frangins Skweek et Supers- 
kweek qui se promènent 
en compagnie de 
Bumpy dans un pays 
qui ravirait Bouyges : 
Builderland. Pour la 
fin de l'année et 
même avant si tout 


va bien, vous pourrez recevoir sur 
vos écrans, une série de nouveau- 
tés. dont je parlerais le mois pro- 
chain (il faut en garder un peu, 
non ?). 

Je peux tout de même parler de 
Guardians, qui est un jeu de ré- 
flexion science-fictionnesque où il 


s'agit d'emmurer des boules 
d'énergie grâce à des briques for- 
mant une “cohésion”. 


Des orages magnétiques se dé- 
clenchent parfois et perturbent vo- 
tre construction, à vous de les dé- 
sactiver. 





















UBI SOFT 


Back to the Golden Age est un 
jeu d'Arcade/Aventure qui vous 
entraîne dans un monde intempo- 
rel : le royaume d'Euroland. 

Ce royaume était dirigé par un 
mage puissant, aux pouvoirs illimités 
grâce à 4 Edres dont il était le seul 
à pouvoir supporter psychiquement 
les interférences. Les 3 prêtres sous 
ses ordres ont tenté de prendre le 
pouvoir mais ne sont parvenus qu'à 
devenir fous. | 

Seul l'un d'entre eux, plus fort et 
plus intelligent, put arriver à ses fins, 
plongeant ainsi le royaume dans le 
chaos. 

Une légende prétena qu'un 
homme seul arrivera bientôt pour 
prendre possession des 4 Edres et 
devenir le nouveau roi, Manque de 
bol, c'est sur vous que ça tombe. Et 
il va falloir se coltiner une série 
d'ennemis plus dangereux les uns 
que les autres. 








DOMARK 


Pourquoi ne pas continuer dans 
un domaine qui marche bien : 
l'adaptation de jeu d'arcade. 


Thunderjaws est de cette race. 
Le scénario est le suivant : des bai- 
gneuses disparaissent régulièrement 
autour du QG souferrain de «Mada- 
me @» qui ambitionne de créer une 
race amphibie mi-reptile, mi-fem- 
me. 


Il faut donc vous jeter à l'eau 
pour empêcher cette abomination, 
Avec votre petit masque et vos pal- 
mes, ainsi qu'un harpon, vous par- 
tez à l'aventure dans des fonds sous- 
marins, pleins à ras-bord de créatu- 
res mortelles. 


Chaque niveau est divisé en 
deux, avec Un partie sous l'eau et 
une autre sur la terre ferme. Com- 
me le repaire secret est Un véritable 
labyrinthe, vous devrez vous armer 
de beaucoup de patience pour ar- 
river au bout du jeu. 





inr0? 


Vous avez vu la couverture du fanzine 
en dessous ? Non, allez voir alors. 


ous avez blen vu, c'est Syntax Error, le fanzine Bon, vu que c'est tout ce que j'ai à dire ce mol-ci et 
mythique est de retour et || garde la formule que je suis encore à la bourre et que Je vais me faire 


qui a fait son succès : des digits et des Jeux de  engueuler par Edmond, Je cesse ce bablllage pas plus 
mots à la limite du supportable. tard que tout de suite. 
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Chouette, || y «a une lettre 
avec le fanzine : «Salut à toute 
la rédaction de CPC Infos (ça 
c'est mol NDLR), Je vous écris 
(non, c'est vrai ? NDLR) pour 
vous dire que votre revue est 
géniale (qu'est-ce qu'il faut pas 
dire pour voir son nom dans le 
canard NDLR). À chaque fois 
que Je le Ils, J'apprends quelque 
chose. (mol c'est parell NDLR) 
D'autre part, Je vous envoie le 
premier numéro de mon fanzine 
avec l'espoir de le voir, peut- 
être, publié dans Fanz'infos (ton 
rêve est devenu réalité, allé- 
loula | NDLR). 

«de l'ai réalisé avec Textomat 
(farcies, NDLR) et OCP pour les 
dessins. On trouvera dans cha- 
que numéro des tests de jeux, 
des pokes, du Basic, des Ilstings, 
bref les rubriques habituelles. Le 
numéro 2 est en préparation 
(sortie prévue courant Novem- 
bre).» 





Guillaume Lasmayous 
43, Domaine de la Garde 
87000 Limoges 


Je laisse la place à l'équipe 
de Croco World pour une pré- 
sentation sommaire et néan- 
moins efflcace en espérant 
qu'ils ne vont pas saloper le ca- 
dre qui leur est imparti. 
«Présentons tout d'abord l'équi- 
pe de rédaction : -Gollo Junlor 
(un gollo plutôt Intello) qui s'oc- 
cupe de la rubrique program- 
mation, Rambeau et Ramilald, 
eux c'est des Jeux qu'ils s'occur- 
pent et le dernier, non moins 
Important : Jean Hubert Marle- 
Joseph qui, lui, s'occupe des 
P.A. et de l'abonnement,» 

Ah, ben nous voila blen rensel- 
gné maintenant, pour les infor- 
mations complémentaires re- 
gardez donc le petit dessin cli- 
Joint et envoyez une tonne de 
courrier à : 


Croco World 
La goderais 
35250 Mouaze 





RE à 
LE CROCO 
DAC A\INTS 


Eh oui, encore un fois, le 
même fanzine. Mais qu'est-ce 
que vous voulez, je n'ai toujours 
pas compris ce que signifie 
l'étrange logo qui orne leur 
couverture. Non mais pourquol 
un rectangle avec trois flèches 
qui se croisent. 

Laissons de coté cette question 
de logo et revenons au fanzine. 
Mol ce que j'aime, dans le Cro- 
co déchainé, c'est le droit de 
défonce. Il s'agit de quelques 
pages où des individus plus ou 
moins recommandables, se li- 
vrent à un défoulement extati- 
que des plus réjouissant. Mal- 
heureusement, il faudrait livrer 
un mode d'emploi avec ainsi 
que des fiches explicatives. 
Sinon, il y a une rubrique BD as- 
sez importante, des tests de jeux, 
des solutions, etc. En général, les 
textes sont Importants, denses et 
les digits plutôt de bonne quali- 
té. 






































Le Croco Déchainé 
5, rue À. Toumade 
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Encore un fanzine qui ne veut pas 
dire son nom mais qui révèle rapide- 
ment son contenu avec des tests de 
jeux, une interview de XOR, une rou- 
tine de damier avec le source et des 
PA. 
Sinon, on peut remarquer des scans 
et autres digits qui meublent un peu 
les cases vides. Mais je sais ce que 
c'est de ne pas avoir de la matlère 
pour remplir une page. Alors on ra- 
conte n'importe quoi, on dlilue, on 
place des virgules et des phrases très 
longues un peu partout en ayant 
SÉLOT ON toujours en vue la ligne d'arrivée fati- 
F16 COMBAT et bien d'une [DEMOS dique de la fin de la page. 
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satée ile superbe page de Pet ec à: DO RU Bon, moi j'ai terminé, Il ne me reste 
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PASSION 


Comme vous le savez certali- 
nement tous, Clandestine, la 
déesse du CPC, l'égérie du fan- 
äne, est passée sur disque pour 
son numéro 6. 



















J'en avais entendu dire du bien 
et Il est vrai que ce premier nu- 
méro sur support magnétique 
est assez réussi : des pages de 
présentation avec de jolis gra- 
phismes, de la musique et 
même des scrollings. 












Les rubriques classiques sont là : 

soft du trimestre, fanzines, as- 

sembleur (avec des morceaux 

de routines dedans), les potins 

a ke HORS ; = Es] de la micro. Bref, c'est du bon 

MR ——,, Ë ONE boulot que vous pouvez obtenir 
F HAE à l'adresse suivante : 














Sandrine Couteller 

Hit 3, rue des hortensias 

= = À À 91380 Chiliy Mazarin 
RAR tre RAR : 
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Je prends le disque n°2 de 




















Micro-dreams, je le lance et | @ Û 

j'apprends que je suis le 18ème + SMEMA DE DISPOSITION. 

lecteur. Allons bon, ça com- | @ vous places indique ou rl 
mence bien. Plus loin je décou- = { 

vre plusieurs pages en overscan |@ L br) 9 Va vil 
avec un peu de musique en ind x Par. 4 1] 

fond. [2 Er. L' | 
Je n'ai plus qu'à choisir dans les |B l 






menus pour accéder à l'édition, 
aux bidouilles du Dr Magouille, 
les gags à gogo, The club et 
autres rubriques. 
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Le tout est plutôt bien présenté 
avec de la zizique et des scrol- 
lings. Pour vous procurer ce fan- 
äne écrivez à 
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Ludovic Hebert 
11, rue Wickram 
68000 Colmar 
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CONSOLES MEGADRIVE A GAGNER 


COMPI 


TIONS 
SUPER HEROES … 145/195 
Robocop +indiana jon 
Last ninja +Espion qui m'aimait 
LES JUSTICIERS 3 145/195 
Batman +Total recall+Shadow dancer 
OCEAN SPORT 145/195 
Manchester united + Pro tennis tour 
Beach volley + Off road racer 
OCEAN ARCADE 145/195 
Midnight resistance + off road racer 
Narc + Golden axe 
TOP 25 .… 185/245 
Andy capp+Flight simul.+Popeye 
+Combat zone+Jawa+Army moves 
Oper.hormuz+Tarzan+Gunboat+Ace2 
Strike force har.+20000 avant JC+Atf 
Malefice atlantes+Bobsleigh+Zynaps 
+After the war+Astro marine corps 
Netherworid+Tuer n'est pas jouer 
Exolon+Skatewars+Foot.manager 2 
Tomahawk 
JAMES BOND Collection .. 125/195 
L'espion qui m'aimait + Permis de 
tuer + Vivre et laisser mourir 
LES COSTAUDS 185/242 
Flimbo's quest+twinlord+Monsters 
R.dangerous 2xeoReye2+Andy cape 
AIR COMBAT ACES . 185/2 
Gunship +Bomber +F| 
+Gee bee air rallye 
LES BATTANTS 2 155/225 
R.dangerous1 & 2 +Double dragon 2 
Licence to kill +Satan+Astro marine 
AIR SEA SUPREMACY ……. 195/295 
Silent service + Carrier command 
+ F15 + Hunt red october + P47 
KARATE ACES 155/225 
Double dragon 1 & 2 + Saboteur 2 
Last BR + Criental games 
RAPP PACK 125/225 
Stunt car + Vixen + Satan + P47 
Army moves + Champion spirit 
FUN RADIO 145/195 
Tortues ninja + Back to the future 2 
Gremlins 2 + Day of thunder 
TOP ACTION . 125/165 
Hard drivin + St rrier 
Pick'n pile + Licence to kill + Tarzan 
+ Operation hormuz 
SUPER SEGA VOL 1... 175/245 
Shinobi + Super Monaco GP 
+ E-swat + Golden axe + Crackdown 
MAX cn 175/245 
St_ dragon+Turrican2+Swiv+Nightshift 
CAPCOM COLLECTION ….175/245 
Strider + Un squadron + Led storm 
Forgotten world +Ghouls and ghosts 
Dinasty + Strider 2 + Duel 
2EME SENS 
Pinball magic + Bubble ghost + 
Freedom + Pick'n pile + Superski 
LE TEMPS DES HEROS ….195/245 
North and south + Prince of Persia 
Moonblaster 
LES STARS 
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Skweek + Bu mpy 
+Superskweek 
SUCCES STORY 165/225 


Bumpy + Skweek + Turbocup 
+ Crazyshot + Space racer 


TOP ACTION 165/225 
Loderunner + Skweek + Moonblaster 
GRAND STAND 145/195 


World c.leaderboard +Pro tennis 

+ Gazza + Continental circus 
VIRTUAL WORLDS 155/195 
Driller + Castel master + Darkside 

+ The sn 

ADDICTÉD TO FUN... 105/155 
Rainbow island + N.zealand story 

+ Bubble bobble 

EPOPEES 1. 
Alive + Sdaw 
TOP 20 
Licence to kill+P47+C 
+Batty+Game over 2+Ace 1+Rax 
Mange cailloux+MLM 3D + G.P 500 
AsparGP + Devilcastle + Hotshot 

+ pce Rider +Buggy 2 +Zaxx 
+3D Grand prix +Battle Valley 
+Super ski +Light force 
COMPIL.EXTRAORDINAIRE 195/245 
Turbo cup + Sapiens + Skweek + Zox 
+Maracaibo + Mobileman + Bumey 

+ Cobra + Bactron + Aigle d'or + Ya 
MEGA MIX... 145/225 
Turrican + Chase hq + Shadow 
parors + Turbo out run 












Crazyc 
+ Pinball meet ht corridor 
SUPER SIM PACK 145/195 
Snowstrike + Heavy metal+ Italy 90 
+ Turbo out run 

MONDE DES MERVEILLES 145/195 


+Mystical 





neeesneesessoonenersncssaseesee 152/249 
North&south+Hostages+Tintin lune 
+Fire and forget +Téenage queen 


LIVRET DE FAMILLE 

Manoir de morteville + Troubadour 
+ Rody & mastico 
COLLECTION N°2 
Dragon ninja + Bea ec 
le mans + B.Bobble + Monsanoy + 
Arkanoid2 + Renegade + Matchday 2 
+ Basket master +Super sprint 

+ Flying shark 

STARS D'HOLLYWOOD ….142/192 
Batman + Indy Action + Robocop 

+ Ghostbusters 2 

LES GEANTS DU SPORT .. 192/259 
Kick off + Great courts + TT Race + 
Football Manager 2 + 3D Grand Prix 
+ Emelyn Hugues + Bobsleigh 

LES DIEUX DU CIEL 192/259 
Chuck Yeager + Ace 182 + ATF 

+ Strike Force Harrier +Tomahawk 
+Hard Drivin + Powerdrift 














15 MEGASTAR 182/259 
Navymoves + Exolon + Buggy 2 

+ Bombjack + Commando + 1942 
+Battle valley + Air Wolf + Bati 
Scoobidoo + Saboteur + Battle ship + 
Ghost & Goblins + Crépuscule Naja 
+ Talisman d'Osiris 

LES FOUS DU FOOT 175/225 
Emelyn Hugues + Foot Manager 2 
Fighting Soccer +Kick off 

LÉS JUSTICIERS 2 145/195 
Ghostbusters2+0.Thunderbolt+Cabal 
POWER UP . 155/225 
Turrican + Chase hq + X-out + 
Rainbow Island + Altered Beast 








LOUE 
3D CONSTRUCTION KIT .… 245/245 
ALIEN STORM … 105/155 
ALI GATOR 149 
ALIVE 195 
ARMALYTE 125/165 
ART DE LA GUERRE 245 


B.CLOUGH EUROSOCCER .97/145 
BACK THE GOLDEN AGE ...97/145 
BACK TO THE FUTURE 3.105/145 









































BADLANDS … 97/145 
BAT éémennneses haruss 245 
BATTLE COMMAND .105/155 
BIG RUN .… 97/145 
BLUES BROTHERS … 155/195 
BONANZO BROS SEGA …... 115/165 
BOOLV A unérsne .145/195 
BOXING MANAGER 145/195 
BRAINIES 135/175 
BRIDGE SIMULATOR 215 
BUILDER LAND 145/195 
CAPTAIN PLANET .105/155 
CARMEN SAN DIEGO . 195 
CHESSMASTER 2175 . se 225 
DARKMAN …................ 105/155 
DEFENDER OF THE Crown 195 
DISC . sssvenssrstsénesstonres 1488/1905) 
EUROPEEN super league .. 105/155 
EXTREME ass 125/155 
F16 COMBAT PILOT .142/195 
FINAL FIGHT... 105/155 
FUGITIF a dise 289 
G LOC R360 .115/165 
GAUNTLET 3 a .105/155 
GOLDENAXE ….......... 105/145 
GRAND PRIX 500 CC 2 195 
GUARDIANS messes 1 95/225 
HEROIC FANTAISY 195 
HERO QUEST .. 105/155 
HUDSON HAWK 125/155 
INFERNAL HOUSE 195 
IRON LORD 172/220 

tresses 108189 
LA CRYPTE DES MAUDITS ..... 195 
LA MALEDICTION 195 
LA SECTE NOIRE ss LD 
LOOPZ TE ... 105/145 
MANCHESTER U. EUROP. 105/155 
MEGA PHOENIX .. 97/145 
MEGATWINS 115/165 
MERCS/,uiiurmnente 145/195 
METAL MASTER 145/195 
MYSTICAL .. 125/162 
NEVERENDING … 105/155 
NIGHT SHIFT .. 97/155 
OUTRUN EUROPA . 115/165 
PAPERBOY 2 .105/155 
PANZA KICK BOXING . 195/245 
PITFIGHTER .. 105/175 
PREDATOR 2 .105/145 
PREHISTORIK ….. 135/175 
RACE DRIVIN 105/155 
RAMPARTS 105/155 
REVELATION .. 97/145 
ROBOZONE .105/155 
ROBOCOP 2 ù .. 97/145 
ROD LAND .115/155 

















ROLLER BALL 195 
SHADOW DANCER . .. 105/155 
SHERMAN M4 …… .. 165/225 
SIM CITY .. 145/195 
SLIDERS .. iris 195 
SMASH TV .. 105/155 
SPIRIT OF EXCALIBUR 105/155 
STAR CONTROL 105/155 
SUPER MONACO GP 105/145 


SUPER OFF ROAD RACER 105/145 
SUPER SPACE INVADERS 105/175 






















SWAP sisi 195 
SWITCHBLADE … 97/145 
TARGHAN .195 
TERMINATOR 2 .…… 105/155 
TORTUES NINJA 2 .… 105/155 
TENNIS CUP .… 159/189 
THE SEARCH OF SHARLA 125/165 
THE SHOE PEOPLE .…. 105/155 
THE SIMPSONS … .… 105/155 
THUNDER BURNER … 195/225 
THUNDERJAWS ….……..…. 105/145 
TRACKSUIT MANAGER 2 ...97/145 
TURRICAN 2 105/155 
WRATH OF THE DEMON ...97/145 
WWF sssieeecrse 125/155 
XYPHOS FANTAISY ….. 195 


PC-TRANS 











UTILITAIRES 
ADVANCED OCP ART STUDIO 245 
APPRENDRE L'ASSEMBLEUR . 295 
AUTOFORMATION BASIC …..…. 290 
CARTOUCHE basic AMSTRAI 69 
COMPTABILITÉ ALIENOR 1550 
COURS DE SOLFEGE 1... 145/195 
COURS DE SOLFEGE 2... 145/195 
DESSIN TECHNIQUE . .. 375 
DESSIN TECHNIQUE TURBO 715 





























DISCBASE:. ati éenrrnre 199 
DISCOLOGY V.6.0 .…… .…. 350 
ECHOSOFT 395 
EQUINOXE repetaiseus CDS) 
FACTURATION + STOCK .…...…. 1550 
FACTURES FACILES ….. 285 
GESTION DOMESTIQUE 249 
GESTION BANCAIRE 245 
GESTION DE FICHIER .….…..... 290 
GRAPHEUR naiss 278 
GRAPH-MASTER 249 
HOUSE MUSIC SYSTEM 250 
IMPRESSION 240 
IMPRIM'IMAGE … 280 
INTEGRE (L') 1... .. 425 
KWIKFILE RARE 199 
LA SOLUTION 595 
MAXAM disc .. 299 
MAXAM cassette 275 
MAXAM rom srrsceese 99 
MENTEL minitel malin + câble .. 395 
MULTIFACE 2 + CPC... 495 
MULTIFACE 2 + CPC PLUS .... 525 
MUSIC PRO se 225 
STATGRAPH . 850 
THE INSIDER 149 
RAMDOS sin 279 
RODOS . 299 
ROMDOS …….. 299 
ROMBOARD ..… 349 
PACK GESTION .-675 
PACK PRINTER 6128 475 
PROTEXT disc 349 
PROTEXT cassette …..….. 295 
PROTEXT rom - 399 
PAGE PUBLISHER PAO 325 
PAGE publisher PICTURE disc . 149 
PSYCHO TEST 185 
SILIPACK 280 
SPRITES ALIVE ssssnsnres 849 
TASWORD + MAIL MERGE ….… 425 
TRAFFIC CB È scie 109 
TRAFFIC EMISSION 249 
TRAFFIC SWL 249 
CONTEST REF 249 
CONTESF CQWWDX 249 
PORTRAIT ASTRAL …… 295 
LE TAROMANCIEN 290 
PREVISIONS ASTRALES ..….... 290 


MICRO CLUB 99F 


°1 - ARKANOID 1+2 

2 - GAUNTLET 1+2 

3 - OUT RUN +ROAD BALSTER 
4 - END.Racer +SUPERHANGON 
N°5 -iK+YIE AR KUNG FU 

N°6 - GRYSOR+GREEN BERET 
N°7 - CALIFORNIA +Winter Games 
N°8 - STREET Fighter +Tiger Road 
N°9 - PLATOON+PREDATOR 

N°10 - CRAZY Cars+SUPER SPRINT 
N°11 - B.BOBBLE+FLYING SHARK 
N°12 - ACE OF ACES+INFILTRATOR 
N°13 - RENEGADE+TARGET REN 
N°14 - TOP GUN+SLAP FLIGHT 
N°15 - ROLLING THUNDER+RYGAR 
N°16 - D.THOMPSON+SUOER TEST 
N°17 - Matchday 2+Basket MASTER 
N°18 - WONDERBOY+WIZZBALL 
N°19 - QUARTET+RAMPAGE 

N°20 - HYPERSPORT+TRACKFIELD 
N°21 - THUNDERBLADE+1943 

N°22 - Road Blaster + Metrocross 


N 
N 
N 
N 


Housse complète clavier+écran 
HOUSSE 464 cpc 
HOUSSE 6128 cpc … 
HOUSSE 464/6128 PLUS …… 
HOUSSE DISC FD1:/DDI1 … 
HOUSSE DMP 2160/3160 . 
HOUSSE DMP 4000 
HOUSSE CITIZEN 120 D 
HOUSSE STAR NL 10 
HOUSSE STAR LC 10 ….. 











Extraordinaire logiciel de transfert de fichiers à partir de votre 


CPC vers IBM-PC ou ATARI-ST et vice-versa 
D'une utilisation facile, rapide et fiable 





RS CUS CURE CUS RS COURS GURRN CURE CURRN GUN COURS CURN GUN OU ON UN EE 
NOUS LIVRONS TOUJOURS LES DERNIERES VERSIONS 


BON DE COMMANDE £WPRESS 
GAGNEZ DU TEMPS ! Commandez par 


à retourner à 


"Quand les prix 
sont si bas: 


EDUCATIFS 


CEDIC-NATHAN 
ALLEMAND DEBUTANT 6/5e 225 
ALLEMAND CONFIRME 4/3e 225 
ANGLAIS CONFIRME 4/3e 225 
ANGLAIS DEBUTANT 6/5e 225 
DONALD alphabet magique 145/195 
Apprends moi compter MAT/CP 225 
Apprends moi à écrire CP/CE …. 225 














Apprends moi à lire 1 MAT/CP .225 
Apprends moi à lire 2 CP .225 
ECRIRE sans faute vol 1 .225 
ECRIRE sans faute vol 2 225 
LABYRINTHE D'ERRARE 225 
Labyrinthe aux cent calculs 225 
LABYRINTHE ANGLOMANIA 1 .225 
LABYRINTHE ANGLOMANIA 2 .225 
LANGUE FRANCAISE CE1 225 
LANGUE FRANCAISE CE2 225 
LANGUE FRANCAISE CM1 225 
LANGUE FRANCAISE CM2 …. 225 
LANGUE FRANCAISE 6e 225 
LANGUE FRANCAISE 5e 225 
LANGUE FRANCAISE 4e 225 
LANGUE FRANCAISE 3e .. 225 
NATHAN MATHS 6/5e … 225 
NATHAN MATHS 4e .. 225 
NATHAN MATHS 3e 225 
NATHAN FRANCAIS CP/CE1 225 
NATHAN FRANCAIS CE/CE2 …. 225 
NATHAN FRANCAIS CM1 225 
NATHAN FRANCAIS CM2 225 
NATHAN MATHS CP/CE1 225 


NATHAN ECOLE MATHS CE2 ..225 

NATHAN ECOLE MATHS CM1 ..225 

NATHAN ECOLE MATHS CM2 225 
MICRO C 














ALLEMAND PRIMAIRE 199 
ANGLAIS PRIMAIRE .. 199 
ITALIEN PRIMAIRE 199 
ESPAGNOL PRIMAIRE 199 
ANGLAIS 4/3e . 199 
DECLIC LECTURE ….. eue 199 
EDUC.MATERNELLE 1 199 
EDUC.MATERNELLE 2 199 
FRANCAIS CM .…..….…...... 170/199 
GRAMMAIRE 6/5e …. 199 
LECTURE CP 199 
MATHS 2e CYCLE 1 199/250 
MATHS 2e CYCLE 2... 170/199 
MATHS 3e 170/199 
MATHS 4e .… 170/199 
MATHS 5e ... 170/199 
MATHS 6e .… 170/199 
MATHS CP .… 170/199 
MATHS CE . 170/199 
MATHS CM... 199/250 
ORTHO CM Sitsssisainnnsats 1 O0 
GENERATION 5 


LESTINAT. MATHS CE 1/2 235 
DESTINAT. MATHS CM 1/2... 235 
DESTINATION MATHS 6/5e ….. 235 
4 SAISONS DE L'ECRIT CE/CM 235 


4 SAISONS DE L'ECRIT 6/3e … 235 
SECRET ENGLAND 6/5e 249 
SECRET ENGLAND 4/3e 249 
DEUTSCHES GEHEMNIS 6/5e .249 
DEUTSCHES GEHEMNIS 4/3e .249 
ORTHO CE1/CE2 249 
ORTHO CM1/CM2 .. 249 
ORTHO 6/56 249 


ELUD VTA 
ORTHOGUS 1.CM/6e 
ORTHOGUS 2. 6/3e 
MATHEX CE/CM 
MATHEX 6/5e 
MATHEX 4/3e . 
MATHEX 6/3e 
PACK REVISION CE/CM 
PACK REVISION 6/5e … 
PACK REVISION 4/3e 


BLELINDIS 
AUTOFORM BASIC+disc(plus) . 149 
BIEN DEBUTER CPC 99 
BIEN DEBUTER 6128 PLUS 78 
LIVRE BASIC 6128 PLUS 99 
LIVRE LANGAGE MACHINE …... 129 


ACCESSOIRES 


CASSETTE D'AZIMUTAGE .. 119 
COPY HOLDER … .. 189 
FILTRE ECRAN 1 sers VOD 
SUPPORT IMPRIM. 80 C. .. 149 
SUPPORT MONITEUR 12-14". 139 
MOUSE MAT (tapis) 65 
ETIQUETTES DISC 3" les 100 ….. 30 





















CARTOUCHES GX4000 





BAD LANDS . 225 
BARBARIAN 2 + 225 
BATMAN .… 225 
CHASE HQ … … 225 
CRAZY CARS 2 225 


EPICS WORLD OF GAMES .…. 225 








FIRE AND FORGET 2 225 
KLAX A nets ne 225 
NAVY SEALS nr 225 
NO EXIT 225 
PANG 225 
PLOTTING 225 
PRO TENNIS TOUR ….…...... 225 
ROBOCOP 2... 225 
SPIDERMAN … 225 
SWITCH BLADE 225 
TENNIS CUP 2 nr 205 
WILD STREET . Mn 22S 
PERIPHERIQUES 
SCANNER DART K7/DISC …… 795 
DIGITALISEUR VID... 749 


LECTUER CASSETTE+CABLE .245 
MULTIFACE 2 + CPC PLUS 525 
MULTIFACE 2 + CPC... 495 
SYNTHE VOCAL DISC ou K7 545 
SYNTHE VOCAL+HP DISC/K7 .. 625 
7 LOGICIELS Educt. vocaux …. 195 


EXT.MEMOIRE 64K/464 … 499 
EXT.MEMOIRE 256K/6128 ….. 1090 
CRAYON OPTIQUE Cassette … 225 


CRAYON OPTIQUE Disquette … 325 


JOYSTICKS 


PHASOR ONE (+MONTRE) …... 109 
COMPETITION PRO . 149 
PRO 5000 .149 
QUICKJOY JUNIOR … 59 





QUICKJOY 2 Tu) 75 
QUICKJOY 2 TURBO 
QUICKJOY 3 SUPERCHAR. …... 99 








QUICKJOY 5 SUPERBOARD …. 192 
QUICKJOY IR INFRAROUGE .…. 390 
QUICKJOY M5 IBM XT/AT …….. 195 
QUICKJOY VI JETFIGHTER .…. 145 
QUICKJOY TOPSTAR 275 
QUICKJOY MEGABOARD 315 
QUICKJOY SEGA FIGHTER ….. 192 
QUICKJOY NI-5 Nintendo 159 
QUICKJOY NI-PRO Nintendo ….. 199 
KONIX SPEEDKING ….….…...... 109 
KONIX SPEEDKING Autofire …. 125 
KONIX THE NAVIGATOR 145 
STING-RAY . FN .. 149 
MANTA-RAY .129 
CABLES 


ADAPT.NOUVEAU BUS CPC ….. 125 








DOUBLEURDE JOYSTICK …...... 49 
DOUBLEUR DE BUS 159 
CABLE IMPRIMANTE .149 


RALLONGE ECRAN/CLAVIER .. 149 
RALLONGE ECRAN/CLAVIER + 149 
CABLE EXTENSION JOYSTICK .49 


CABLE FD T's 109 
CABLE MAGNETO CASSETTE ... 49 
CABLE MINITEL CPC nuñis D5. 


CABLE PERITEL CPC 119 
RALLONGE (ALIM+VIDEO 464) 109 
CABLE GX4000 à CPC 6128 119 













K 


NL 















































GAMEBOY 
GAMEBOY CARRY CASE 99 
GAMEBOY ILLUMINATOR .. 119 
GAMEBOY GAME LIGHT 99 
GAMEBOY LIGHTBOY 299 
GAMEBOY AMPLIFIER ….......... 139 



















GAMEBOY KIT NETTOYAGE 

BATMAN 
BATTLE UNIT ZEOTH . 
BEETLEJUICE 








BOMBER BOY 

BO JACKSON. 

BUBBLE BOBBLE .. 259 
BUGS BUNNY 2 259 
BURGER TIME DELUXE .259 


CADILLAC 2 
CASTELIAN 
CASTELVANIA 2 … 
CHASE HQ 
CHOPLIFTER 2 
CONTRA 
CYCLE GRAND PRIX 
DAYS OF THUNDER . 
DICK TRACY 
DOUBLE DRAGON 2 . 
DRAGON'S LAIR 
DUCK TALES 
ELEVATOR ACTION 
F1 SPRIT se 
FINAL FANTAZY 2 
FUNNY FIELD ….. 
GHOST N GOBBLINS 
GHOSTBUSTERS 2 ….. 
GREMLINS 2 
IN YOUR FACE 





MALIBU BEACH VOLLEY 
MARU'S MISSION … 
MEGAMAN 
MICKEY MOUSE 2 
MYSTERIUM 
NAVY SEALS 
NBA ALL STAR . 
NEMESIS 2 … 
OPERATION C 
PACMAN .…… 
PUNISHER 
PUZZNIC 
RADAR MISSION 
RESCUE PR.BOBLETTE 





















SKATE OR DIE 

SNOOPY 
SOCCERMANIA 
TAIL GATOR 
TEENAGE M TURTLE NINJA . 
TERMINATOR 2. " 
THE SIMPSONS . 
TOUR DE TRASH … 
TURBO RACING 
WHO FRAMED R.RABBIT 
WWF SUPERSTARS 








SUPER PROMO 


ADAVANCE OCP ART SUTDIO. 
IMPRIMANTE DMP 3160 + Protext. 
LA SOLUTION Textomat +Datamat +Calcomat 


Me) Eure delle, Ge) 


5 SUPERBOARD 


LECTEUR CASSETTE + CABLE .. 
PORTRAIT ASTRAL 
[NE Tee]Ke/c) AAC RUE 
CONSOLE GX4000 
ORDINATEUR CPC 6128plus couleur 

















REF par10 par20 | par 50 DISQUETTES 3" 
= EE Pour AMSTRAD 
|__3"CF2 |169F | 310F, 745F £ 
3" 1/2 DFDD, 69 F 130 F, 300F F90 
5"1/4DFDD 56F 105F 250 F| * à l'unite par 50 








Disquettes certifiées 100% garantie à vie.Livrées avec enveloppes plus etiquettes 





| BOITIERS PLASTIQUES 3" 
t 


ET3"50 32 F Les Dix 








[3 JESSICO - BP693 - 06012 NICE CEDEX 

















 43,51,61,30 us 03,97.22.00 PAR MINITEL 3615 CODE JESSICO - OUVERT 7 / 7 - 8H à 20 H 


Li Je joins un chèque ou mandat lettre 
: QJe paie à réception au facteur 
| QJe paie par carte bleue et je complète les 2 lignes ci-dessous 


1-11 


+ 25F 





























TITRES (garantie échange immédiat) | Qte Prix Montant 
| 
Î 
| carte bleue 
| 
NOM. 
| 
PORT:LOGICIEL JEUX 20F S/TOTAL | NET RUE. 
IMPRIMANTES + CONSOLES 60F PORT | 25 VIÉLE ste 
ORDINATEURS 120F TOTAL | 
UTILITAIRES + ACCESSOIRES  25F 
DOM TOM + ETRANGER + 60 F 


PAIEMENT ETRANGER EXCLUSIVEMENT PAR MANDAT INTERNATIONAL 


GARANTIE 1 AN SUR LES LOGICIELS 


précisez votre 


date d'expiration . 


CODE POSTAL LD 1 1 1 


BOUTIQUE A NICE LYWOOD STAR 8 BD JOSEPH GARNIER 





ordinateur | 


DISC) IK7! 1! 


SIGNATURE OBLIGATOIRE 


_ 
LULLLLLLLLLLLLLLLLLLLLLLLLLLALLLLLLLLLALLLLLLLLLLLLLLLALLLLLLLLALLLLLLLLLLLLLLALLLLLALLALLLLLLLLALLLALLLALRLLLLLLLLLULUU A) 


NS 


GRAPH-MASTER 249 F 


CREATION DE 10 TYPES DIFFERENTS DE DIAGRAMMES! 


DISCBASE 199 F 
LE SEUL GESTIONNAIRE ULTRA RAPIDE DE DISQUETTES ! 


" 99 % DES UTILISATEURS DE DISQUETTES TROUVERONT 
QUE DISCBASE EST INDISPENSABLE! : 
DISCBASE EST UN GESTIONNAIRE DE BASE DE DONNÉES 
SPECIALISÉ DANS LE CLASSEMENT, LA RECHERCHE DE 
DISQUETTES ET DES FICHIERS QU'ELLES 
CONTIENNENT.POUR CONSTRUIRE VOTRE BASE DE DON- 
NÉES VOUS N'AVEZ QU'A INSÉRER VOS DISQUETTES 
DANS LE LECTEUR, LES UNES À LA SUITE DES AUTRES ET 
LE PROGRAMME LIRA ET ENREGISTRERA LEUR 
CATALOGUE.VOUS POUVEZ DONC RECHERCHER ET 
RETROUVER EN MOINS D'UNE SECONDE LA DISQUETTE 
DANS LAQUELLE SE TROUVE UN FICHIER 

PLUS DE PAGAILLE, PLUS DE TEMPS PERDU EN 
RECHERCHES INUTILES ! 

* JONGLE COMME UN CHAT AVEC LES CATS *MET À JOUR 
AUTOMATIQUEMENT LA LISTE DES CATALOGUES 

‘LISTE ENTIÈREMENT LES DISQUETTES ET LES FICHIERS 
“IMPRIME LES LISTES ET CATALOGUES 





*HISTOGRAMME *HISTOGRAMME ANNUEL *HISTOGRAMME 
ANNUEL 3D *DIAGRAMME PIE *DIAGRAMME DES TEMPS 
*DIAGRAMME DE FONCTIONS COMPLEXES *GRAPHIQUE 
EN LIGNES ‘GRAPHIQUE EN BARRES * BAR GRAPHS 
COMPARATIFS * 

IL Y À 6 PROGRAMMES DE BASE SUR LE MENU PRINCIPAL 
D'OU TOUS LES AUTRES SONT SÉLECTIONNÉES 
INCONTESTABLEMENT LE GRAPHEUR LE PLUS 
COMPLET,LE PLUS PUISSANT SUR CPC 

IDEAL COMPAGNON DES MATHEUX DE BAZ ET DE LA FAC 
AINSI QUE POUR LE MONDE DES AFFAIRES 












Gagnez de l'argent ! faites comme 
les pros, utilisez le meilleur logiciel 
de création de jeux. 

SPRITE ALIVE DISC ….349 F 


SI VOUS VOULEZ RÉALISER VOS PROPRES JEUX AYANT UN 
ASPECT PRO 

C'EST SPRITES ALIVE QU'IL VOUS FAUT. 

* BASIC SIMPLE * DETECTEUR DE COLLISIONS VRAIES 

* MOUVEMENT SOUPLE PIXEL PAR PIXEL 

* COMPATIBLE SOURIS, JOYSTICKS, CLAVIER 

* 23K DE MÉMOIRES PROGRAMMÉES 

* 64 SPRITES SUPER-CHOUETTES * MODE LABYRINTHE 
AUTOMATIQUE. 

* COMMANDES AUTOMATIQUES DE MISSILES 

* 70 COMMANDES SUPPLÉMENTAIRES EN BASIC 

* PUISSANT, HYPER RAPIDE GRACE AU COMPILER 

* 6 PROGRAMMES DE DEMO BASIC.+ 2 DE DEMO COMPILER. 





KWIKFILE 199 F 


UN PUISSANT GESTIONNAIRE DE DONNEES, POUR LE 
PRIX D'UN SIMPLE JEU ! 


UNE BASE DE DONNÉES À FAIBLE PRIX POUR UNE 
MANIPULATION RAPIDE ET AISÉE DE FICHIERS DE 
DONNÉES 

CARACTÉRISTIQUES : UTILISATION À 100% PAR MENU 

* JUSQU'À 19 RUBRIQUES PAR ENREGISTREMENT * TOTAL 
DES RUBRIQUES * LONGUEUR DE TOUS LES CHAMPS DE 
VARIABLES ‘28 CARACTÈRES PAR RUBRIQUE(PLUS POSSI- 
BLE MAIS PAS AFFICHÉ) * JUSQU'À 22000 OCTETS PAR 
CHAMP * TRI ALPHA-NUMÉRIQUE SUR TOUS LES CHAMPS * 
RECHERCHE RAPIDE PAR TOUCHE QUI AFFICHE SUR 
L'ÉCRAN TOUS LES ENREGISTREMENTS CONTENANT LES 
DONNÉES DÉSIRÉES * IMPRESSION DE TOUTES LES RUBRI- 
QUES DANS N'IMPORTE QUEL ORDRE “RÉPONSE AVEC OÙ 
SANS NOM DE CHAMP * CALCULS DANS LES RUBRIQUES 
(IDÉAL POUR TENUE DE STOCK..) POSSIBILITÉ DE CHAN- 
GER DE FORMULE DE CALCUL DANS TOUTE RUBRIQUE ET 
D'EN AJOUTER * CATALOGUE DE FICHIERS GÉRÉS PAR 
MENUS 











MAXAM  ASSEMBLEUR-DÉSASSEMBLEUR 
ASSEMBLEUR-DÉSASSEMBLEUR, SYSTÈME COMPLET DE 
DÉVELOPPEMENT DU Z 80 
LE NEC + ULTRA DU PROGRAMMEUR 
MENU DÉROULANT : LOAD, MERGE, SAVE, PRINT, FIND 


REPLACE, ETC 
ROM : 399 F CASSETTE : 275 F DISC : 299 F 






























UN OUTIL REMARQUABLE DE REPRODUCTION D'IMAGES, DOCUMENTS DESSINS, PHOTOS, ETC k . 
COMPATIBLE: AVEC * DMP 2000/2160/3000/3160° AMX PAGEMAKER, SOURIS ET CRAYON.* CPC DISK OU CASSETTE ( À PRÉCISER) 
DESCRIPTIF : AGRANDISSEMENT X1 - X2 - X3 - X6 * ZOOM * PRINT * LOAD * SAVE * COPY * EDIT * RAJOUT DE TEXTE * 1 OU 2 ECRANS 
IMPRESSIONS DEMI OÙ PLEIN FORMAT * ROTATION ECRAN DE 180 





"L'ATELIER DE L' ARTISTE" THE ADVANCED OCP ART STUDIO 


OCP VOUS PERMET DE CREER UNE IMAGE, DE LA REDUIRE, AGRANDIR, COUPER, COLLER, INCLINER,COLORIER GRACE 
AUX 8 PISTOLETS, 16 PINCEAUX ET BROSSES À PEINTURE INCORPORES, PROJECTION D'OMBRES ET DE FONDS POSSIBLE. 
SACRÉ MEILLEUR LOGICIEL DE DESSINS ET GRAPHISMES SUR CPC. 


SUPER-PROMO 695 F 


COMPRENANT : THE ADVANCED OCP ART STUDIO + UNE SOURIS GENIUS MOUSE + UN TAPIS SOURIS + UN 
PORTE SOURIS + UNE INTERFACE SOURIS 








VIDI capte et transfère plus de 6 images /sec. 
directement de votre 
vers votre ordinateur 


magnétoscope, caméra, télé 


Sauvegarde sur cassette ou disquette 
Travaille en MODES 0, 1 ou 2 

16Ko de mémoire vidéo additionnelle 
Contrôleur d'images incorporé 

Compatible OCP ART STUDIO 

Livré avec câble RCA, BNC + câble PERITEL 











AI 


CIIFA(E Que 





SI VOUS SOUHAITEZ GELER UN PROGRAMME , LE COPIER 
ENSUITE SUR DISQUETTE OU CASSETTEAUTOMATIQUEMENT 
EN APPUYANT SIMPLEMENT SUR UN BOUTON, LA SEULE ET 
UNIQUE SOLUTION C'EST MULTIFACE 2. , 
D'UNE UTILISATION SIMPLE À LA PORTÉE DE TOUS, GUIDÉ 
PAR UN MENU DÉROULANT 
APRES AVOIR LANCE LE PROGRAMME, VOUS POURREZ 
LE STOPPER , LE SAUVEGARDER OÙ ENCORE L'ÉTUDIER 
ET LE DÉTAILLER À VOTRE CONVENANCE, GRACE AU 
MULTI - TOOLKIT INCORPORE DANS MULTIFACE 2. 
EN APPUYANT SUR RETURN OÙ EN LE RECHARGEANT LA 
FOIS SUIVANTE IL REPRENDRA AUTOMATIQUEMENT, DEPUIS 
L'ENDROIT OÙ VOUS L'AVEZ GELE. 









MULTIFACEZ + CPC 464/6128 .…… mener 495 F 
MULTIFACEZ + CPC 464/6128 PLUS 525 F 
THE INSIDER ….............. 149F 


L'INDISPENSABLE COMPAGNON DU MULTIFACE 2 
VOULEZ-VOUS TOUT CONNAÎTRE À L'INTERIEUR D'UN PROGRAMME ! 
BRANCHEZ THE INSIDER, avec MULTIFACE 2, LANCEZ UN PROGRAMME, 
GELEZ-LE ET ALORS THE INSIDER VOUS RÉVÉLERA TOUT : IL DÉSASSEMBLE 
COMPLÉTEMENT, CHERCHE ET TROUVE TEXTES ET CODES, AFFICHE ET MO- 
DIFIE RAM ET REGISTRES DU Z 80, IMPRIME. 


NN 








PAGE PUBLISHER PAO: 325 F 


* PUBLICATION ASSISTÉE PAR ORDINATEUR 6128 
* CRÉEZ TRES FACILEMENT VOS DOCUMENTS, POSTERS, 
PETITS JOURMAUX, LOGOS, FANZINES, ETC 

* PAGE PUBLISHER P.A.O. PERMET LE CONTRÔLE, AUSSI 
BIEN DE L'IMPRESSION QUE DU GRAPHISME 

* COMPATIBLE TOUTES IMPRIMANTES MATRICIELLES, EPSON, 
DMP 2160/3160 

* GÉRÉ PAR ICONES ET MENUS, PAGE PUBLISHER P.A.O 
PEUT ÊTRE PILOTE PARC CLAVIER OÙ JOYSTICK 

* RECONNU COMME LE N°1 DE LA MICRO EDITION PAR LA 
PRESSE EN GB POUR SON RAPPORT QUALITE/PRIX 
PAGE PUBLISHER PICTURE DISC 149 F 
(PLUS DE 400 FONTES ET DESSINS SUPPLEMENTAIRES 


PROTEXT TRAITEMENT DE TEXTE 


AMSTRAD CPC 100% N°40 " PROTEXT BRILLE PAR SES 
PERFORMANCES 

SANS AUCUN DOUTE LE MEILLEUR TRAITEMENT DE TEXTE 
SUR CPC, RECONNU COMME LE N° 1 PAR TOUTE LA PRESSE 
INFORMATIQUE 4 
COMPLET, PUISSANT, HYPER RAPIDE, D'UTILISATION TRÈS 
FACILE. COMPATIBLE TOUTES IMPRIMANTES. 

ROM : 399 F CASSETTE : 295 F DISC : 349 F 











SUPER PROMO 


IMPRIMANTE STAR LC200 COULEUR + DRIVER 2525 F 
IMPRIMANTE STAR LC200 COULEUR + DRIVER 

+ ADVANCED OCP ART STUDIO 2690 F 
DRIVER IMPRIMANTE COULEUR (LC10 OU LC200) 199 F 


“ce driver permet d'imprimer toutes les images couleurs du CPC 
vers votre imprimante( LC10 ou LC200 exclusivement) 





EE 
THE MUSIC MACHINE ..….595 F 


‘PERMET DE COMPOSER DE LA MUSIQUE, SAUVEGARDER, 
EDITER, CHARGER, SONS, RYTHMES ET INSTRUMENTS 

* C'EST AUSSI UNE CHAMBRE D'ECHOS AVEC PLUSIEURS 
EFFETS. THE MUSIC MACHINE SERT EGALEMENT DE 
BATTERIE, 8 TONALITES DE DRUM, SONT PROGRAMMÉES, 
MAIS ON PEUT EN REPRODUIRE D'AUTRES 

* COMPATIBLE 100% MIDI * SORTI HIFI + MICRO 

* DISQUETTE OÙ CASSETTE 





PORTRAIT ASTRAL 295 F 


CERTAINEMENT LE MEILLEUR LOGICIEL D'ASTROLOGIE 
RÉALISÉ PAR LE PLUS GRAND ASTROLOGUE FRANCAIS 
PORTRAIT ASTRAL VOUS ENCHANTERA ET VOUS 
PERMETTRA DE MIEUX VOUS CONNAITRE. 

THEMES ASTRALS - HORLOGES ASTRALES - PLANETES 
ASTRALES ETC,ETC... 











AUGMENTEZ LA MEMOIRE DE VOTRE CPC ! 
AVEC DK'TRONICS 


EXTENSION MÉMOIRE 64K POUR CPC 464/664 499 F 
EXTENSION MÉMOIRE 256K POUR CPC 6128 1090 F 
CRAYON OPTIQUE CASSETTE … 225 F 
CRAYON OPTIQUE DISQUETTE .. 325 F 


EXTENSION MEMOIRE: AUGMENTE DE 64 K OÙ 128 K LA 
CAPACITÉ MÉMOIRE DE VOTRE CPC \ 
CRAYON OPTIQUE : PERMET D"EXPLOITER LES CAPACITÉS 
GRAPHIQUES DU CPC. 








LECTEUR 3.50/ 800 K POUR CPC 


INDISPENSABLE POUR LES USAGERS AYANT BESOIN DE 
CAPACITÉ DE STOCKAGE 800 K * 80 PISTES * DOUBLE FACES 
POUR L'UTILISER PLEINEMENT IL EST NÉCESSAIRE D 'AVOIR 
UN DES 3 LOGICIELS SUIVANTS RODOS * ROMDOS * RAMDOS 
* ROMDOS ET RAMDOS SONT DEUX LOGICIELS IDENTIQUES 
SAUF QUE ROMDOS EST EN ROM ET NÉCESSITE 
L'UTILISATION D'UN ROMBOARD POUR SON INSTALLATION, 
COMME RODOS. \ 

*RAMDOS EST LIVRÉ EN DISQUETTE. ILS SONT TOUS 
COMPATIBLES AVEC AMSDOS, CPM 2.2 ET CPM +. 

* RODOS LIVRÉ EN ROM EST LE PLUS COMPLET, IL OFFRE 
PLUS DE 50 COMMANDES SUPPLÉMENTAIRES, CONFIGURE 
AUTOMATIQUEMENT LE DRIVE B, OFFRE UN SILICON DISK, 
UN BUFFER D'IMPRIMANTE, L'ACCES DISK EST 3 FOIS PLUS 
RAPIDE, COMPATIBLE AVEC AMSDOS, IDÉAL POUR LES 
UTILISATEURS EXPÉRIMENTÉS 

SI C'EST UNIQUEMENT LE STOCKAGE QUE L'ON RECHERCHE 
NOUS VOUS CONSEILLONS ROMDOS OÙ RAMDOS. 









LECTEUR 3.50 + ROMDOS . 1295 F 
LECTEUR 3.50 + RAMDOS . 1195 F 
LECTEUR 3.50 + RODOS . 1295 F 
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SWAPLAX 






vert de cases de couleur, voi- 

ci le décor de ce nouveau 
défi. Il faut assembler les cases de 
même couleur par 3 où plus en ho- 
rizontal où en vertical. A chaque 
assemblage réussi, la construction 
disparaît et vous devez recommen- 
cer jusqu'à la disparition de (pres- 
que) toutes les briques. En effet, un 
compteur de crédit vous autorise, 
suivant le niveau, à laisser 4, 32,1 
briques sur le terrain en fin de par- 
tie. 
Pour jouer utilisez le joystick ou les 
flèches et la touche COPY. 


| n grand terrain de jeu, cour- 








Cyril CAUCHOIS 


Valable pour CPC 664 - 6128 


CHARGEMENT 


LA 
Tapez et sauvez les programmes Ne 
suivants : 

SWAPLAX.BAS ù 


SWAPDATA.BAS 


TABLEAU.BAS 

Puis lancez par RUN SWAPDATA pour 

créer SWAPLAX.RTN et TABLEAU pour 

créer SWAPLAX.REC. n / 


Lancez le jeu avec RUN*SWAPLAX”. 


D d 








CPC infos 
Attention, notez bien ce qui suit : 
Dès le mois de septembre, tous les mercredis 


de 14 h à 17 h, la rédaction se tiendra à votre 
disposition au 99 52 98 11 pour tous renseigne- 
ments techniques. En dehors de ce créneau les 
réponses techniques se feront par courrier (n’ou- 
bliez pas de menticnner votre adresse et joignez 
un timbre pour la réponse) ou bien par Minitel 
sur le 3615 code : MHZ. 
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À CHR$ (157) 





429 LOCATE 7,5:PEN 1:PRINT CHR$(148);:PEN 2:PRINT CHR#( >KD 
158); :PEN 3:PRINT CHR$(152);:PEN 4:PRINT CHR$(154) ; :PEN 
3:PRINT CHR$(156);:PEN 2:PRINT CHR$(152) ; :PEN 1:PRINT 
CHR$ (158) 
435 CLEAR INPUT LT 
448 f$=INKEYS:IF f$="" THEN 448 )XJ 
SW/A PI AX ‘ RAS 459 1F f$="1" THEN jsk=9:G0T0 1869 JA 
468 IF f$="2" THEN jsk=1:G0T0 1868 )AD 
479 1F f$="3" THEN 618 )NB 
488 1F f$="4" THEN sc=15998:GOTO 1378 )CA 
499 IF f$="5" THEN MODE 1:INK 8,1:INK 1,24:PEN 1:BORDER >DD 
LS" FARENIERRENEENENNNNNUNE )LA {:END 
28" ## #4 DLB | 588 1F f#=firs THEN j5k=8:GOTO 1869 )BD 
38" #x SWAPLAX CL LC | 518 IF INKEY(76)C>-1 THEN jsk=1:G0T0 1868 >HD 
48" #4 # LD | 529 IF INKEY(64)<>-1 THEN jsk=8:GO0TO 1868 >HA 
58 ' ## BY #4 DLE | 538 IF INKEY(65)C>-1 THEN jsk=1:G0T0 1868 >HD 
69 ? #x H DLF | 549 IF INKEY(57)<)-1 THEN 619 NT 
78 " ## FREDERIC DUPUIS  +#+ )LG | 558 IF INKEY(56)C-1 THEN sc=8:G0TO 1379 GB 
88 " 4 #4 DLH | 569 IF INKEY(49)<)-1 THEN MODE L:INK 9,1:INK 1,24:PEN 1 DKK 
98 ' #x AND LE )LJ :BORDER 1:END 
198 ‘#3 # )RB | 579 GOTO 448 26 
119 *## CYRIL CAUCHOIS  #+ D'MRTTTTTINTE CET IIIITEE EEE) >TD 
128 '## #4 )RD | 599 ’+x REDEFINITION TOUCHES ## )TE 
[IRAMLEELIETECTENT EST TITLE DRE | 699 "HHRMRENEMNRENNNNHENNNNENUNE >RG 
148 KEY DEF 66,9,8,9,8:POKE LBDEE, &C9 >CB | 619 CLS )UB 
159 GOSUB 6968 >PK | 628 CLEAR INPUT )LU 
168 MEMORY &BFFF:LOAD"SWAPLAX.RTN", 89888 KV | 639 x1=18:y1=1:a$="UP":GOSUB 4948 )AC 
179 CALL 49989 DHH | 648 f$=INKEYS:IF f$="" THEN 649 >XN 
188 DIM sc(11),nna$(11) >PK | 659 IF JO0Y(#)<>8 THEN 648 )RC 
199 OPENIN"SNAPLAX. REC" DUP | 668 up$=f$ MF 
298 FOR a=1 TO 19 AG | 679 x1=17:y1=25:a$-"DOWN":GOSUB 4948 )EA 
218 INPUT 49,sc(a),nat(a) >TC | 688 f$=INKEYS:1F f$-"" THEN 689 XX 
228 NEXT >DK | 699 IF J0Y(#)<>8 THEN 688 )RL 
239 CLOSEIN DEG | 798 IF f$=up$ THEN 688 >PK 
249 DEF FN falx,y)=&C#88+(y-1)#89+(x-1)#2 )GH | 719 down$=f$ )FB 
258 up$=CHR$(248) : dount=CHR#(241):1ft$=CHR#(242):rgt8=C DGT | 728 x1=8:y1=12:a$="LEFT":GOSUB 4948 )CY 
HR$ (243) :fir$=CHR$ (224) 738 ft=INKEYS:IF f$="" THEN 738 >XN 
269 CLS:MODE 8: INK 8,9:INK 1,26:INK 2,17: INK 3,8:INK 4, DWK | 748 IF JOY(S)C8 THEN 738 )RC 
4:FOR a=5 TO 15:INK a,8:NEXT:BORDER 8 759 1F f$=up$ THEN 738 >PL 
275 x1=14:y1=12:a$="PLEASE WAIT":GOSUB 4948 DML | 768 IF f$=downt THEN 738 )RB 
288 GOSUB 978 DJF | 778 1ft9-f4 JD 
299 CLS:FOR a=8 TO 15:INK a,#:NEXT DBZ | 768 x1=35::y1=12:a$="RIGHT":GOSUB 4949 >FH 
388 üSCREENCOPY,1,3:WINDOW #2,1,29,13,25:CLS 82 )QR | 799 f$=INKEYS:1F f$="" THEN 798 >XB 
318 INK 1,26:INK 2,17:INK 3,68:1INK 4,4:INK 5,7:1NK 6,16: DRA | 888 IF JOY(#)C>8 THEN 798 )RF 
INK 7,1:INK 6,24:INK 9,26: INK 19,13 818 1F f#=upt THEN 798 >PP 
329 RESTORE 338 )DB | 628 IF f$-=downt THEN 798 RE 
338 DATA 12,19, "1<KEYBOARD" DVF | 839 IF f$=1ft$ THEN 798 > 
349 DATA 12,12, "2(JOYSTICK" JVU | 849 rgt$=f$ JW 
358 DATA 12,14, "3CREDEFINE KEYS" JAN | 858 x1=17:y1=12:a$="FIRE":GOSUB 4948 >DK 
368 DATA 12,16,"4(SEE HIGH SCORES" )CA | 669 f$=INKEYS:1F f$-"" THEN 868 De 
378 DATA 12,18, "5S<QUIT" QD | 878 IF JOY(#)<>8 THEN 868 )RL 
388 DATA 8,24, "PROGRAMMING AND GRAPHICS BY FRED AND BOB DEA | 888 IF f$=up$ THEN 868 >PV 
# 698 1F f$-dowun$ THEN 868 >RK 
399 DATA 6,25, "HUSIC ADAPTED BY FRED AND BOB" >PQ | 989 IF f#=1ft$ THEN 868 > 
488 FOR b=1 TO 7:GOSUB 4939 :NEXT )ZX | 918 1F f$=rgt$ THEN 869 )QF 
419 LOCATE 7,4:PEN 1:PRINT CHR$(147);:PEN 2:PRINT CHR$( DKD | 928 fir$=f$ VF 
149); :PEN 3:PRINT CHR$(151);:PEN 4:PRINT CHR#(153) ; :PEN 938 GOTD 299 >ZK 
3:PRINT CHR$(155);:PEN 2:PRINT CHR$(151);:PEN 1:PRINT CITES EEE TETE EEE TD 





959 *+## TABLEAU DES SCORES #3 )TE 
068 "HHANIENNENTHNNNNIENNNTEE )TF 
978 yz=398:b=38933 DHE 
988 b=b+1:a=PEEK(b) >NC 
998 IF a=252 THEN GOTO 1878 >UK 
1999 PLOT 599,yz,a:DRAUR 4,8,a >YP 
1818 PLOT 589,yz-2,a:DRAUR 4,8,a >2D 
1928 b=b+1:a=PEEK(b) >PB 


1838 IF a=255 THEN DRAUR 4,9, 8:HOVER -4,2,8:DRAVR 4,8, 
#:yz=yz-4:G0T0 988 


1848 NOVER 9,2,a:DRAUR 4,$,a >WD 
1859 HOVER -4,-2,a:DRAUR 4,8,a >XK 
1868 GOTO 1929 LH 
1979 yz=398:b=38933 NU 
1888 b=b+1:a=PEEK(b) >PR 
1999 IF a=252 THEN GOTO 1178 )UJ 
1188 PLOT 148,yz,a:DRAUR -4,8,a DYY 
1119 PLOT 148,yz-2,a:DRAUR -4,9,a )AD 
1128 b=b+1:a=PEEK(b) )PL 


1138 IF a=255 THEN DRAUR -4,8,8:MOVER 4,2,8:DRAUR -4,8, 
D:y2=yz-4:G0T0 1988 


1148 NOVER 9,2,a:DRAUR -4,8,a JWK 
1159 HOVER 4,-2,a:DRAUR -4,8,a > 
1168 GOTO 1128 >LK 
1178 yz=2:b=38933 )LY 
1188 b=b+{:a=PEEK(b) PT 
1198 IF a=252 THEN GOTO 1278 JUL 
1298 PLOT 148,yz,a:DRAUR -4,9,a DYZ 
1218 PLOT 149,yz+2,a:DRAUR -4,9,a )AC 
1228 b=b+{:a=PEEK(b) >PH 


1238 IF a=255 THEN DRAWR -4,8,8:MOVER 4,-2,8:DRAUR -4,8 
,#:y2z=yz+4:G0T0 1188 


1248 NOVER #,-2,a:DRAUR -4,8,a >XH 
1259 MOVER 4,2,a:DRAUR -4,f,a )WR 
1268 GOTO 1228 >HB 
1279 yz=2:b=38933 )LZ 
1288 b=b+1:a=PEEK(b) >PU 


1298 IF a=252 THEN LOCATE 8,12:PRINT STRING$(6,128):üSC )JZ 
REENCOPY, 3, 1:CLS :RETURN 


1389 PLOT 588,yz,a:DRAUR 4,8,a )YT 
1318 PLOT 588,y2+2,a:DRAWR 4,8,a )2C 
1329 b=b+1:a=PEEK(b) $ >PN 


1338 IF a=255 THEN DRAVR 4,8,B:MOVER -4,-2,8:DRAUR 4,8, 
S:yz=yz+4:G0T0 1288 


)XE 


1348 NOVER #,-2,a:DRAUR 4,8,a JL 
1359 HOVER -4,2,a:DRAUR 4,9,a ER 
1368 GOTO 1328 HD 


1378 CLS:NODE 9:INK 9,8: INK 1,26:1NK 2,17:INK 3,8:INK 4 )PG 
42INK 5,7:1NK 6,16:INK 7,1:INK 8,24: INK 9,26:INK 19,13 
:BORDER 8 


1388 IF sc<=sc(1) THEN 1698 JUL 
1399 x1=9:y1=12:a$="ENTER YOUR NAME :":GOSUB 4949 VC 
1498 SPEED KEY 19,5 KG 
1418 FOR k=1 TO 6:letr$(k)="":NEXT k )CR 
1428 11=28:FOR n=1 TO 6 )QN 
1438 CLEAR INPUT )LL 
1448 f$=INKEYS:IF f$="" THEN 1448 >ZP 


1458 IF INKEY(79)C-1 AND n>1 THEN xi=28:n=1:FOR a=1 TO >ZB 
6:letr$(a)="":NEXT:LOCATE 15,12:PRINT * ":GOTO 1448 





î 


1468 IF INKEY(18)-1 THEN 1548 >XC 
1478 f$=UPPERS(f$) JHL 
1488 IF f$<"8" OR f$>"2Z" THEN 1448 )YR 
1498 IF f$<"A" AND f$)"9" THEN 1448 >YP 
1588 letr$(n)}=f$ )LC 
1518 a$=f$:GOSUB 4949 )PE 
1529 x1=x1+1 BA 
1538 NEXT n >VK 
1548 na$=letr$(1)tletr$(2)+letr$(3)+letr$(4)+letr$(5)+1 >JC 
etr$(6) 

1558 IF naÿ="" THEN na$="MCX" DB 
1568 FOR s=19 TO 1 STEP -1 )RR 
1578 IF sc<sc(s) THEN 1688 DTN 
1588 FOR v=2 TO s )HA 
1598 sc(v-1)=sc(v):nm$(v-1)=nm$(v) >CR 
1689 NEXT v WF 
1618 sc(s)=sc:na$(s)=nm$ TT 
1628 OPENOUT "SYAPLAX.REC" uv 
1638 FOR k=1 TO 19 )LG 
1649 WRITE #9,sc(k),na$(k) DUX 
1658 NEXT k >WK 
1669 CLOSEOUT 2) 
1678 GOTO 1698 >NH 
1689 NEXT 5 >XA 
1698 CLS:MODE # )BE 
1788 üSCREENCOPY, 1,3 on 


1718 LOCATE 7,3:PEN 1:PRINT CHR$(447);:PEN 2:PRINT CHR# ONF 
(149);:PEN 3:PRINT CHR#(151);:PEN 4:PRINT CHRS(153) PE 

N 3:PRINT CHR$(155);:PEN 2:PRINT CHR$(151);:PEN 1:PRINT 
CHR$(157) 

1728 LOCATE 7,4:PEN 1:PRINT CHR$(148);:PEN 2:PRINT CHR$ DNF 
(159); :PEN 3:PRINT CHR$(152); :PEN 4:PRINT CHR$(154) ; :PE 

N 3:PRINT CHR$(156);:PEM 2:PRINT CHR$(152); :PEN 1:PRINT 
CHR$ (158) 

1738 LOCATE 7,23:PEN 1:PRINT CHR$(159); :PEN 2:PRINT CHR )QJ 
$(161);:PEN 3:PRINT CHR$(163) ;:PEN 4:PRINT CHR$(165) ; :P 

EN 3:PRINT CHR$(167);:PEN 2:PRINT CHR$(163);:PEN 1:PRIN 

T CHR$(169) 

1748 LOCATE 7,24:PEN 1:PRINT CHR$(168);:PEN 2:PRINT CHR )QZ 
$(162);:PEN 3:PRINT CHR$(164); :PEN 4:PRINT CHR$ (166) ; :P 

EN 3:PRINT CHR$(168);:PEN 2:PRINT CHR$(164);:PEN 1:PRIN 

T CHR$(178) 


1758 x1=13:y1=8:a$="SCORE  NAME":GOSUB 4948:y1=9 >UQ 
1768 FOR c=18 TO 1 STEP -1 RB 
1778 x1=19-LEN(STRS(sc(c))):y1=y1+1:a$=MID$(STR#(sc(c)) DXJ 
2, LEN(STR$(sc(c)))-1):GOSUB 494ÿ 

1788 11=28:a$=nat(c):GOSUB 4948 DYK 
1799 NEXT )LJ 
1898 PLOT 192,384,3:DRAN 192,88:DRAN 432,8#:DRAW 432,39 )PQ 
4:DRAW 192, 384 

1818 CLEAR INPUT )LN 
1829 IF INKEY$C)"" THEN CLS:GO0TO 299 ELSE 1828 )HB 
1838 'HAANANNNENEENENNER )YE 
1848 '#x DESSIN DECOR #1 YF 
1858 'HUEMIERNENEENEAENLE »YG 
1868 CLS:NODE 8 )BD 
1878 11=16:y1=12:at="PAUSE":G0SUB 4948 FN 
1888 CLEAR INPUT )LU 
1899 f$=INKEYS:1F f$="" THEN 1898 2) 
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1999 IF JOY(#)C>8 THEN 1899 JUA 


1918 1F fé=upt THEN 1898 )QL 
1928 1F f#=doun$ THEN 1698 >TF 
1938 1F f#=1fté THEN 1898 >RA 
1948 IF f#=rgt$ THEN 1698 RJ 
1958 IF f$-firé THEN 1898 >RI 
1968 psdt=f$ >CF 
1978 CLS:HODE # >BF 
1988 x1=16:y1=12:a$="ABORT":GOSUB 4948 >FR 
1998 CLEAR INPUT DLY 
2886 f$=INKEYS:IF f$="" THEN 2589 >YH 
2819 1F J0Y(#)C9 THEN 2998 JUA 
2826 1F f$=up$ THEN 2886 )QL 
2938 1F f#-dowvnt THEN 2869 )TF 
2949 1F f#=1fts THEN 2869 >RA 
2858 1F fé=rgts THEN 299 RJ 
2669 1F f$=firs THEN 2868 >RI 
2878 1F f$=psd$ THEN 2968 RE 
2988 abt$-f$ )AD 
289 CLS:MODE # AK 


2188 x1=2:y1=18:at="A QUEL NIVEAU VOULEZ VOUS COMMENCEZ >XP 
2":GOSUB 4949 


2118 xi=12:yl=12:a$="i 2 3 4":GOSUB 4949 >ND 
2129 CLEAR INPUT LH 
2138 f6=INKEY$:IF f$="" THEN 2138 )ZH 
2149 IF f$<"1" OR f$)"4" THEN 2139 >XA 
2158 niv=VAL(f$) )LX 
2168 CLS:MODE 8 )AH 


2178 RESTORE 2189:FOR a=8 TO 15:READ c:INK a,c:NEXT:BOR )EG 
ND 9,29,14,5,2,26,2,1,6,18,17,24,9,9,8,9 )LZ 
2198 FOR a=8 TO 188 STEP 4:PLOT a, 399, 7:DRAUR 9,-76:NEX >ZR 
su FOR a=469 TO 649 STEP 4:PLOT a,399,7:DRAUR #9,-76:N >BU 
se FOR a=192 TO 448 STEP 4:PLOT a,399,7:DRAUR 9,-76:N >BD 
2 FOR a=4 TO 176 STEP 4:PLOT a,395,6:DRAUR #,-68:NEX )ZQ 
3 FOR a=464 TO 636 STEP 4:PLOT a,395,6:DRAUR 5,-68:N )BC 
me FOR a=196 TO 316 STEP 4:PLOT a,395,6:DRAUR 9, -68:N >BA 
= FOR a=324 TO 444 STEP 4:PLOT a,395,6:DRAUR 9, -68:N )BW 
ni FOR a=12 TO 168 STEP 4:PLOT a,333,8:DRAMR 8, 56:NEX )2Y 
3 FOR a=472 TO 628 STEP 4:PLOT a,333,#:DRAUR D,56:NE DAK 
is FOR a=284 TO 388 STEP 4:PLOT a,333,B:DRAUR #,56:NE DAY 
Li FOR a=332 TO 436 STEP 4:PLOT a,333,B:DRAUR 9,56:NE AD 
ui FOR a=$ TO 12 STEP 2 )QA 
2319 PLOT 16,a,6:DRAVR 684,#:PLOT 16,a+386,6:DRAMR 694, >ZP 
ni PLOT a+16,8,6:DRAVR #,312:PLOT a+618,8,6:DRAMR 8,3 DAR 
24 NEXT >KK 


2348 FOR a=8 TO 4 STEP 2 QD 
2358 PLOT 16,a,7:DRAUR 684,49:PLOT 16,a+314,7:DRAUR 684, DZV 
[] 
2368 PLOT 16+a,8,7:DRAUR #,318:PLOT a+618,9, 7:DRAUR 8,3 DAV 
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2379 NEXT )LD 
2388 PLOT #,319,8:DRAUR 649,8 )WD 
2398 11=3:y1=2:a$="SCORE" :GOSUB 4948 )EL 
2489 x1=3:y1=4:a$-"98989" :GOSUB 4949 )CV 
2418 11=38:y1=2:a$-"HIGHSCORE" :GOSUB 4948 KG 
2429 x1=32:y1=4:a$-"99099":GOSUB 4949 >DG 
2438 x1=14:y1=2:a$-="TIME":GOSUB 4948 )DK 
2449 x1=14:y1=4:a$="3888":GOSUB 4949 )CE 
2458 x1=21:y1=2:a$= "CREDIT": GOSUB 494$ F2 
2469 x1=23:y1=4:a$="g4":GOSUB 4948 )BH 
2478 WINDOW #1,2,19,7,24 )RL 
2488 Ivi=1:1f=4:5c=8 )PB 


2498 11=38-LEN(STR$(sc(18))):y1=4:a$=HID$(STR$(sc(19)), DEV 
2,LEN(STR$(sc(1#)))-1) 


2598 GOSUB 4949 )XG 
2519 'HAHAEAAENTE >YA 
2528 ‘#1 LEVEL #4 )YB 
2538 HHMHIHEHENEE >YC 
2548 IF Ivi=17 THEN Ivl={iniv=nivt#{ )DY 
2558 IF niv=5 THEN 2568 ELSE 2619 )YX 
2568 CLS #1 )LH 
2578 x1=13:y1=12:a$="CONGRATULATION":GOSUB 4948 TZ 


2588 11=5:y1=14:a$="YOU>VE FINISHED ALL THE SCREEN":G0S >MW 
UB 4948 

2598 FOR a=1 TO 2588:NEXT a DUE 
2689 GOTO 1379 HG 
2618 ON Ivi GOSUB 2638,2649,2659, 2668, 2679,2688,2699,27 )EQ 
98,2719,2728,2738,2749, 2758, 2760,2778,2789 


2628 GOTO 2799 NF 
2639 RESTORE 5248:RETURN UF 
2648 RESTORE 5299: RETURN JUX 
2659 RESTORE 5348:RETURN )UJ 
2668 RESTORE 5399:RETURN >UQ 
2679 RESTORE 5449:RETURN JUN 
2688 RESTORE 549ÿ:RETURN JUU 
2698 RESTORE 5548:RETURN >UQ 
2788 RESTORE 5509: RETURN >UH 
2718 RESTORE 564#:RETURN JUS 
2728 RESTORE 5698: RETURN >UQ 
2738 RESTORE 5748:RETURN UM 
2748 RESTORE 5799: RETURN JUU 
2758 RESTORE 5849 :RETURN )UQ 
2768 RESTORE 5899: RETURN JUX 
2778 RESTORE 5949:RETURN UU 
2788 RESTORE 5999: RETURN JUA 
2798 x1=14:y1=4:a$="3988" :GOSUB 494 CN 
2888 CLS #1 )LE 
2819 x1=16:y1=13:a$="LEVEL" :GOSUB 4949 >FK 
2828 11=21:y1=13:a$=STR$(1vl):GOSUB 4949 )JN 
2838 FOR a=1 TO 2588:NEXT TK 
2848 CLS Hi )LJ 
2859 FOR a=1 TO 17 STEP 2:READ a$ )YL 
2868 FOR b=1 TO 18:c$=MID$(a$,b,1):c=VAL(c$) KW 


2878 IF c=$# THEN 2899 NJ 





2888 PEN c47:PAPER S:LOCATE b+1,a+6:PRINT CHR$(145):LOC DKD 


ATE b+#1,a+7:PRINT CHR$(146) 

2898 NEXT:NEXT 

2988 READ nrg,nvr,nrs,njn 

2918 1=328:y=176:tap=3888:aft-8 

2929 EVERY 58,3 GOSUB 4499 

2938 GOTO 3218 

2949 VHHHEHNENIEE 

2958 ‘#1 LE JEU + 

2969 HHNIHENENTEE 

2978 1F nrgtnvrtnrstnjn=# THEN 2988 ELSE 2998 

2989 mf=RENAIN(3):1vl=1vl+1:G0T0 2548 

2998 IF nrg<3 AND nvr<3 AND nrs{3 AND njn<3 THEN 3128 
3599 ORIGIN 9,8 

3818 FOR e=288 TO 32 STEP -32 

3829 FOR f=48 TO 528 STEP 32 

3838 ts1=TEST(f,e):ts2=TEST(f+32,e):t53=TEST(+64,e) 


3949 IF ts109 AND ts208 AND ts3C8 THEN ORIGIN 9,8:G0 


TO 3218 

3858 NEXT:NEXT 

3868 FOR f=48 TO 592 STEP 32 

3979 FOR e=288 TO 96 STEP -32 

3889 tsi=TEST(f,e):ts52=TEST(f,e-32):t53=TEST(f,e-64) 


3898 IF t51€38 AND ts2C>8 AND ts3©8 THEN ORIGIN 8,9:G0 


TO 3218 

3199 NEXT:NEXT 

3118 ORIGIN x,y 

3128 IF niv=4 THEN GOSUB 5848:G0T0 3188 

3138 ncl=nrgtnvrinrstinjn 

3148 IF ncl>6 THEN GOSUB 5848:G0T0 3188 

3158 IF ncl>2 AND niv=3 THEN GOSUB 5848#:G0T0 3188 
3168 IF ncl>4 AND niv=2 THEN GOSUB 5848:G0T0 3189 
3179 mf=REMAIN(3):1vi=lvl+1:G0T0 2548 

3188 IF aft=1 THEN GOTO 2548 

3198 IF aft-2 THEN G0TO 5168 

3288 DRAVR 38,9,9:DRAMR 9,38:DRANR -38,9:DRAUR 5, -38 


3218 ORIGIN x,y:DRAUR 39,9,5:DRAVR 9, 38:DRAVR -39,9:DRA 


VR 9, -38 

3228 IF aft=1 THEN 254ÿ 

3238 IF aft=2 THEN 516$ 

3248 IF jsk=1 THEN 3349 

3259 f$=INKEYS$:1F f$="" THEN 3228 

3268 1F f$=1ft$ AND x232 THEN x=x-32:G0T0 3288 

3278 IF f$=rgt$ AND x<576 THEN x=x+32:G0T0 3288 

3268 IF f$=up$ AND y<272 THEN y=y+32:G0T0 3288 

3298 IF f$=down$ AND y>32 THEN y=y-32:G0T0 3288 
3388 1F f$=fir$ THEN 3438 

3318 IF f$=psd$ THEN GOSUB 4688 

3328 1F f$=abt$ THEN GOSUB 4888 

3338 GOTO 3229 

3348 f$=INKEYS:IF f$="" THEN 3228 

3358 IF INKEY(74)C>-1 AND x232 THEN x=1-32:G0T0 3288 
3368 1F INKEY(75)€-1 AND x<576 THEN x=x+32:G0T0 3288 
3378 IF INKEY(72)©-1 AND y(272 THEN y=y+32:G0T0 3288 
3388 1F INKEY(73)€-1 AND y)32 THEN y=y-32:G0T0 3288 
3398 IF INKEY(76)©-1 THEN 3438 

3499 1F f$=psd$ THEN GOSUB 4688 

3418 IF f$=abt$ THEN GOSUE 4888 

3428 GOTO 3228 


LH 
VL 
AA 
>TU 
MH 
)YH 
DYJ 
)YK 
HG 
)GY 
>UG 
)XE 
JUU 
UX 
ZX 
)EN 


HG 
UC 
JVC 
)ZG 
)ET 


DHC 
>FH 
DFF 
DL 
)FU 
)QB 
)QD 
GP 
D 
JVH 
JWK 
)JK 


>QH 
)QL 
)QY 
)ZN 
'HH 
NT 





3438 IF TEST(16,16)=8 THEN ORIGIN x,y:GOTO 3248 )PA 
3448 1(1)=x:y(1)=y:fr=1:GOT0 3498 )BA 
3458 ORIGIN x,y:DRAUR 38,9,5:DRAUR 8,38:DRAVR -38,8:DRA DJR 


VR 9,-38 

3468 fr:# )EG 
3479 IF aft=1 THEN 2548 )QQ 
3488 IF aft=2 THEN 5168 >QU 
3499 IF jsk=1 THEN 3598 )QN 
3598 16-=INKEYS:1F f$="" THEN 3478 )2U 
3519 IF f$=1ft$ AND x>32 THEN 3798 )ZN 
3528 1F f$=rgté AND x<576 THEN 373$ )AR 
3538 IF f$=up$ AND y<272 THEN 376$ )ZL 
3548 IF f$-down$ AND y>32 THEN 3798 )AR 
3558 IF f#-fir$ THEN 3688 )RU 
3568 1F f$=psd$ THEN GOSUB 4688 )XZ 
3578 IF f$=abt$ THEN GOSUB 4888 )XK 
3588 GOTO 3478 >MH 
3598 f$=INKEYS:1F f$="" THEN 3478 )2D 
3698 IF INKEY(74)C>-1 AND x)32 THEN 3788 )EZ 
3618 IF INKEY(75)C-1 AND x(576 THEN 3738 )FC 
3628 IF INKEY(72)C>-1 AND y<272 THEN 3768 FX 
3638 IF INKEY(73)C>-1 AND y>32 THEN 3798 )FD 
3648 IF INKEY(76)C>-1 THEN 3688 DIR 
3658 IF f$=psd$t THEN GOSUB 4689 )XZ 
3668 1F f$-abt$ THEN GOSUB 4888 JXK 
3678 GOTO 3478 )NH 
3688 IF TEST(16,16):9 THEN 3498 >XH 
3698 x(2)=x:y(2)=y:G0T0 3858 WT 
3798 IF TEST(-32,8)€>8 THEN 3499 >YG 
3719 x=x-32 )VH 
3728 IF fr=1 THEN 3458 ELSE ORIGIN x+32,y:DRAUR 38,8,89: DHQ 
DRAUR 5,38:DRAUR -39,8:DRAUR 9,-38:G0T0 3459 

3738 1F TEST(32,9)<28 THEN 3498 >XH 
3748 x=x+32 NV] 
3758 IF fr=1 THEN 3458 ELSE ORIGIN x-32,y:DRAUR 38,8,89: HW 
DRAUR 9,38:DRAUR -39,8:DRAUR 8,-38:G0T0 3459 

3768 IF TEST(9,32)<>8 THEN 3498 )1Q 
3718 y=y+32 > 
3788 IF fr=i THEN 3458 ELSE ORIGIN x,y-32:DRAUR 38,9,8: DHZ 
DRAUR 9,38:DRAUR -39,8:DRAUR 9,-38:G0T0 3458 

3798 IF TEST(8,-32)<>8 THEN 3498 )YR 
3889 y=y-32 >) 


3819 IF fr=1 THEN 3458 ELSE ORIGIN x,y+32:DRAUR 38,8,9 DJV 
:DRAUR 9,38:DRAVR -39,8:DRAUR 9,-38:G0T0 3458 


3828 HMENIHENENNENEENTE DYF 
3838 "## VERIFICATION ## >YG 
3848 THNENEENEENIENFENTE >YH 
3859 af=REHAIN(3) )HU 
3868 x1=x(1)/32+1:y1=25-(y(1)/16) )ZH 
3878 x2=x(2)/32+1:y2=25-(y(2)/16) >ZN 
3888 ORIGIN x(1),y(1) :c1=TEST(16, 16) )DQ 
3898 ORIGIN x(2),y(2):c2=TEST(16, 16) >DV 
3988 DI PJ 


3919 PEN ci:PAPER S:LOCATE x2,y2:PRINT CHR$(146) :LOCATE >GB 
x2,y2-1:PRINT CHR$(145) 

3929 PEN c2:PAPER 8:LOCATE x1,y1:PRINT CHR$(146) :LOCATE )GZ 
xÂ,y1-1:PRINT CHR$(145) 


3938 EI )QC 


£ 3948 ORIGIN x(1),yC1):DRAVR 39,9,8:DRAWR #,38:DRAMR -35 >QD 





»S:DRAUR 8, -38 

3958 ORIGIN x(1),y(1):x4=x1:y4=y1 DER 
3968 t1=TEST(-48,16):t2=TEST(-16,16) :t3=TEST(16, 16):t4= DMC 
TEST(48, 16): t5=TEST(88, 16) 

3978 IF t3-8 THEN 3998 

3988 GOSUB 4119 

3998 ORIGIN x(1),y(1):x4=x1:y4=y1 

4898 ti=TEST(16,-48):t2=TEST(16,-16):t3=TEST(16, 16) :t4= 
TEST(16, 48) :t5=TEST (16,88) 

4919 IF t3=5 THEN 4938 

4928 GOSUB 4188 

4838 ORIGIN x(2),y(2):x4=12:y4=y2 

4949 t1=TEST(-48,16):t2=TEST(-16,16) :t3=TEST(16, 16) :t4- 
TEST(48, 16): t5=TEST(88, 16) 

4958 IF t3=-8 THEN 478 

4868 GOSUB 4119 DV) 
4879 ORIGIN x(2),y(2):x4=x2:y4=y2 )BP 
4888 t1=TEST(16,-48):t2=TEST(16,-16):t3=TEST(16,16):t4= >HW 
TEST(16, 48) :t5=TEST (16,88) 

4999 1F t3=5 THEN EVERY 59,3 GOSUB 4498:G0T0 2979 )Q 
4188 GOSUB 4188:EVERY 59,3 GOSUB 4498:GO0T0 2978 )NE 
4119 IF t1=t2 AND t2=t3 AND t3=t4 AND t4=t5 THEN x4=x4- DTA 
2:nbc=5:G0T0 4258 

4128 IF t2=t3 AND t3=t4 AND t4=t5 THEN x4=x4-{:nbc=4:G0 DFL 
TO 4258 

4139 1F tict2 AND t2=t3 AND t3=t4 THEN x4=x4-2:nbc=4:6G0 DFG 
TO 4258 


)PA 
)XJ 
>B4 
>HH 


>ND 
)XB 
BK 
)HR 


)PD 


4149 IF t3=t4 AND t4=t5 THEN nbc=3:G0T0 4258 XKE 
4159 IF t2=t3 AND t3=t4 THEN x4=14-L:nbc=3:G0T0 4258 DVI 
4168 1F t1=t2 AND t2=t3 THEN x4=x4-2:nbc=3:G0T0 4258  DVV 
4178 RETURN )FF 


MB8 IF t1=t2 AND t2=t3 AND t3=t4 AND t4=t5 THEN y4=y4+ UD 
&:nbc=5:GOT0 4278 | 

4198 1F t2=t3 AND t3=t4 AND t4=t5 THEN y4-y4+2:nbc4:G0 )FX 
T0 4278 

4299 1F t1=t2 AND t2:t3 AND t3:t4 THEN ya=yäs4:nbc=4:G0 )FJ 
T0 4278 


4219 IF t3=t4 AND t4=t5 THEN nbc=3:G0T0 4278 KE 
4228 IF t2=t3 AND t3=t4 THEN y4=y4+2:nbc=3:GOT0 4278  DVY 
4239 1F t1=t2 AND t2=t3 THEN y4=y4t4snbc=3:GO0T0 4278  DVX 
4248 RETURN )FD 
4258 LOCATE x4,y4:PRINT STRING$(nbc,CHR$(128)):LOCATE x >BH 
4,y4-1:PRINT STRING$ (nbc, CHR$ (128) ) 

4268 GOTO 4288 >ND 
4278 FOR xy=(y4-nbc#2)+1 TO y4:LOCATE x4,xy:PRINT CHR$( >MD 
128) :NEXT 

4288 1F t3=8 THEN nrg=nrg-nbc XF 
4298 IF t3-9 THEN nvr=nvr-nbc )YG 
4398 1F t3=18 THEN nrs=nrs-nbc >YQ 
4318 IF t3=11 THEN njn=njn-nbc )YP 
4328 GOSUB 4389 >XG 
4338 EVERY 58,3 GOSUB 4498 )TQ 
4348 RETURN DFE 
4358 VHRNHENRUENIE )YE 
4368 ‘xx SCORE 4 )YF 
UKy/ AÉTTLITITTIEE >YG 
4388 sc=sc+5832" (nbc-3) >RH 
4398 IF sc(188 THEN x1=6:GO0T0 4438 AG 


4498 IF sc<1988 THEN x1=5:GO0TO 4438 )BA 


4418 IF sc(18988 THEN xi=4:GO0TO 4439 


4428 11=3 >DB 
4438 sc$=MID$(STR$(sc),2,LEN(STR$(sc))-1) >KK 
4448 yi=4:a$=sc$:GOSUB 4948 >VT 
4458 RETURN >FG 
AAGD HRHHAHERENT )Y6 
4479 ‘ax TEMPS #4 )YH 
AABB VHNENAEENENX )YJ 
4498 tap=tap-19 )LK 
4589 IF tap<188 THEN pr$="98":GOTO 4538 EU 
4518 IF tap<1888 THEN pr$="#":G0TO 4538 )ET 
4528 pr$="" >PB 
4538 tap$=NID$(STR$S(tap),2,LEN(STRS (tap))-1) >PN 
4548 x1=14:y1=4:a$=pr$ttap$:GOSUB 494$ )GE 
4558 IF tap=8 THEN tu=1:G0T0 5949 DAT 
4568 RETURN )FJ 
4578 "HRREHENE YJ 
4588 ‘xx PAUSE x3 DK 
CCCTARETT EL PET TEE ZA 
4689 nf=RENAIN(3) >MH 
4619 üSCREENCOPY, 2,1 )QP 
4629 CLS Hi >LG 
4638 x1=14:y1=18:a$="GAME PAUSED":GOSUB 4949 >NG 


4649 PEN 8:LOCATE 9,12:PRINT CHR$(145) :LOCATE 9,13:PRIN DNF 
T CHR$(146) 

4659 11=19:y1=13:a$=":"+MID$(STRS(nrg),2, LEN(STR$(nrg)) UV 
-1):GOSUB 4948 

4668 PEN 11:LOCATE 9,15:PRINT CHR$(145) :LOCATE 9,16:PRI PV 
NT CHR$(146) 

4678 x1=19:y1=16:a$=":"+MIDS$(STR$(njn),2, LEN(STR$(njn)) DUY 
-1):G0SUB 4948 

4688 PEN 9:LOCATE 9,18:PRINT CHR$(145) :LOCATE 9,19:PRIN DNZ 
T CHR$(146) 





4698 11=19:y1=19:a8="2"+MID$(STRS (nvr),2, LEN(STRS(nvr)) >UN 
-{):GO0SUB 4948 
4788 PEN 1#:LOCATE 9,21:PRINT CHR$(145) :LOCATE 9,22:PRI >DPG 
NT CHR$ (146) 
4718 11=19:y1=22:a8=":"#MIDS(STRS(nrs),2, LEN(STR$(nrs)) DUT 
-1):G0SUB 4948 
4728 CLEAR INPUT )LR 
4738 f$=INKEYS:1F f$="" THEN 4738 )ZA 
4748 àSCREENCOPY, 1,2 )QU 
4758 EVERY 58,3 GOSUB 4498 )TI 
4768 RETURN )GA 
47178 QTITETESTEI I >ZA 
4788 ‘xx ABORT x+ )2B 
ATOS ARAAENAENEE >ZC 
4888 af=RENAIN(3) >MP 
4818 üSCREENCOPY, 2, 1 )R 
| 4828 CLS #1 >LJ 
| 4839 x1=14:y1=18:a$="ABORT GAME" :GOSUB 4948 )LZ 
4849 xi=11:y1=12:a$= "CONFIRMATION Y:N":GOSUB 4948 >VP 
4858 CLEAR INPUT )LU 
| 4868 f$=INKEYS:IF f$="" THEN 4868 )2J 
4878 f$=UPPERS(f$) )MU 
4888 1F f$="Y" THEN GOTO 299 >UQ 
4898 IF f$="N" THEN EVERY 58,3 GOSUB 4498: üSCREENCOPY, 1 DFJ 
,2:RETURN ELSE GOTO 4868 
| [CIIAMPTENTE ET ETTT ETES TETE >YF 
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4919 ‘#x ROUTINE D'AFFICHAGE #4 


CUP] RE TTEEZETT TE ETES EST >YH 
4938 READ xi,yl,a$ >HN 
494 DI:a$=UPPER$(a$) )QL 
4959 FOR a=1 TO LEN(a$) )QU 
4969 z=(ASC(MID$(a$, a, 1)))-48 »vQ 
4978 IF z<8 OR 242 THEN 4999 >VN 
4988 CALL &9538,FN falxi,y1)}+(ax2),89558+(2#16) )ND 
4999 NEXT >MD 
5889 ET :RETURN >FH 
ETIURRETTTTETEETE >XJ 
5928 ‘#x PERDU ## )XK 
5838 'ARERAEHEENT DYA 
5949 nf=REMAIN(3) )HL 
5858 CLS Hi )LE 
5869 IF tu=1 THEN 5978 ELSE 5588 )XY 


5978 x1=16:y1=18:a$="TIME UP*:GOSUB 4949:tu=8:GOT0 5899 AP 


5888 x1=9:y1=19:a$="YOU CANDT DO ANYTHING":GOSUB 4948 ZA 
5898 1f=1f-1:x1=9:y1=14 >RD 
5198 IF 1f1 THEN a$="YOU HAVE" :b$=STR$(1f):c$=" CREDIT FH 
S LEFT":a$=a$+b$+ct:GOSUB 4948:G0T0 5138 

5118 IF 1f-1 THEN a$="YOU HAVE" :b$=STR$(1f):c$=" CREDI >FQ 
T LEFT" :a$=a$+b$+c$:GOSUB 4948:G0T0 5139 

5129 a$="YOU HAVE NO CREDIT LEFT" :GOSUB 4949:GO0T0 5158 >AU 
5138 11:23:y1=4:a$="#"+MIDS(STRS(1f),2,LEN(STR$(1f))-1) DNK 
:GOSUB 4948 


51489 FOR a=1 TO 2588:NEXT:aft=1:RETURN >GB 
5158 FOR a=1 TO 25#8:NEXT:aft=2:RETURN | >GD 
5168 CLS #1 )LG 
5179 x1=15:y1=15:a$="GAME OVER" :GOSUB 4948 KB 
5188 FOR a=1 TO 2588:NEXT )TL 
5199 GOTO 1379 )ND 
5208 "AUHHAIERENIEUEENTE >XK 
5219 "#4 LES TABLEAUX ## )YA 
5229 'HNIHIEENENEENRENTE >YB 
5239 ‘#+ TABLEAU #1 #4 )YC 


5249 DATA 912344321123443219, 823490880899884328,8341898 DIN 
99808081438 - 

5258 DATA #41298998000092140,812300885888803218, 2234809 >JG 
989908084329 

5268 DATA 034198998888901430,841299988899892148,#123443 )JL 
211293443218 

5278 DATA 18,18, 18,28 >ND 
5288 ‘## TABLEAU 92 #4 )YH 
5298 DATA SO8008068808908698,8612348988899432199,9823419 >JG 
069089143298 

5399 DATA 993412341143214388, 899899412214900998, 9834123 DJY 
411432143898 

5318 DATA 992341998888143286, 891234890899432198, 8899808 >HH 
S0968000608 

5328 DATA 18,14, 16, 18 JNA 
5338 '#+ TABLEAU 93 #4 )YD 
5348 DATA 121212121121212121, 343B00884498890343, 1299890 JF 
93308909821 

5359 DATA 349998941148989943,123443212212344321, 3499888 >JK 
411488900543 

5368 DATA 128868993388988821,343800894498998343, 1212121 >JH 
211212121421 





>YG * 5378 DATA 32,26, 29,29 JHR 


5388 xx TABLEAU #4 #3 )YJ 
5398 DATA S98898081208086808, 890899234432898998,0801234 >J2 
43344321898 
5498 DATA 08868234432996888, 980809891298898008, 590881 DHA 
23321899899 
5418 DATA 988123412341234908, 899234123412341998,9893412 DJE 
341234128898 
5429 DATA 15,19, 19,17 NF 
5438 "xx TABLEAU 85 #* )YE 
5448 DATA 081199988908991199,423329891199823328,4122148 DJE 
233298412214 
5458 DATA 128921432234128821,290892318813298992, 1298214 JU 
3223412921 
5468 DATA 412214923328412214, 823329891190823328,0811888 >JG 
96896081199 
5478 DATA 39,36, 18, 12 DNA 
5488 ’#* TABLEAU 86 #4 >YK 
5499 DATA 998008991199989088, 590989234432808805, 9896814 >JJ 
233241809888 
5598 DATA 998123434434321989, 112344321123449211,9891234 >JB 
344343216888 
5518 DATA 998091423324198909, 09909234432600808, 8000809 >JB 
911990090898 
5528 DATA 18,16,28,28 JNR 
5538 ’## TABLEAU 87 #4 YF 
5548 DATA 991234123321432199, 812690890898868219, 3419808 )JN 
599099090341 
5558 DATA 23B068088868996932, 0680088689888899à, 2309888 )HB 
96968859832 
5568 DATA 341098088898986341,91280888B898808218,0812341 )JX 
233214321988 
5578 DATA 16,16, 16,18 NZ 
5588 ’## TABLEAU 98 #4 )ZA 
5599 DATA G98908988808899600, 800990812348888898, 0899881 HZ 
23321960808 
5698 DATA 998091234432198889,809812341143218898, DB99B12 DJA 
34432190889 
5618 DATA 998098123321998089, 899899812348690898, 086989 HR 
S0908600968 
5628 DATA 14,12,12,8 HA 
5638 "#4 TABLEAU #9 ## )YG 
5649 DATA 991231988908132198, 899123490894321898, 6898123 JU 
49943210895 
5658 DATA 998651234432199889, 899884321123498899, 899812 )JD 
344321699908 
5668 DATA 098912349943219000, 890123498094321998,9812329 DJA 
959099232198 
5678 DATA 25,29, 18,14 )NN 
5689 ’x# TABLEAU 19 #4 )ZB 
5698 DATA 123419234432914321,234123841149321432, 8893418 DJX 
96989143008 
5798 DATA 418892341143298814, 123419234432814321, 4199823 JT 
41143288814 
5718 DATA 998341988988143898,234123841149321432, 1234192 >JP 
344328914321 
5728 DATA 32,24,28,32 NA 
5738 *## TABLEAU 11 #4 )YH 


ÿ 5749 DATA 123412341143214321, 288808893388898992, 3891234 JE 





12214321893 
5758 DATA 488198993388981984,123412341143214321, 4891888 >JV 
533986819884 
5768 DATA 368123412214321983, 208089893388898882, 1234123 )JG 
411432143921 
5778 DATA 39,24, 28,28 DNA 
5788 "xx TABLEAU 12 #x )ZC 
5798 DATA 912394123321493218, 234123860890321432,9341829 >JP 
933689281438 
5688 DATA 949601234432189848, 910234123321432918, 0488812 DJF 
344321980848 
5819 DATA 934192993388291438, 234123888899321432,0123841 >JG 
233214983218 
5828 DATA 24,28, 32,22 NA 
5638 *## TABLEAU 13 #4 DYJ 
56848 DATA 991234198881432199,8128992189120#9218, 1238483 DJL 
211238489321 
5858 DATA 238414932238414932, 349232991199232943, 2304149 DJF 
322384149832 
5669 DATA 123948321123948321,812899218812888218,8B12341 JN 
90081432198 
5876 DATA 38,32, 24,18 >ND 
5689 ‘#4 TABLEAU 14 #1 )2D 
5898 DATA 123412349043214321, 266936408904938892, 3412394 DJX 
911984932143 
5999 DATA 498199293302981984, 123491134431194321, 4881892 DJ 
933982891904 
5918 DATA 341238491184932143, 209838480894939882, 1234123 >JP 
409843214321 
5928 DATA 26,22, 28,28 NJ 
5938 ’## TABLEAU 15 ## TK 
5948 DATA 098998901198088800,234819823329819432, 3412349 DJU 
1221#432143 
5958 DATA 412934123321438214, 8908923411432#9898, 2348123 DJY 
499843219432 
5968 DATA 341238498004932143, 412839488894939214, 5899800 >JK 
960080809008 
5978 DATA 29,22,24,24 NZ 
5989 ‘xx TABLEAU 16 #4 ZE 
5998 DATA 123898268954998321, 116892341143288818,9234123 DJX 
#6893214328 
6909 DATA 341893093308388143, 492992341143298294, 3419838 DJY 
93369389143 
6919 DATA 923412398003214329, 819892341143280818, 1239884 >JG 
890948608321 


6928 DATA 22,21,39,19 >NH 
6038 "HHARENHANENE >YB 
6849 ‘'#x SYMBOL #4 )YC 
6859 "HANAHAAANEEX >)YD 
6968 SYHBOL AFTER 145 PC 
6879 SYMBOL 145,8, 126, 126, 126, 126, 126, 126, 126 )LV 
6888 SYHBOL 146,126, 126, 126, 126,126, 126, 126,8 )LX 
6898 SYMBOL 147,68,68, 182, 182,96,96, 68,68 >GH 
6188 SYHBOL 148,6,6, 192, 192,68,68,9,9 )CX 
6119 SYMBOL 149,198, 198, 198, 198, 198, 198, 214, 214 >Nÿ 
6129 SYHBOL 155,254, 254, 238, 236, 198, 198, 8,8 )JA 
6135 SYMBOL 151,24, 24,68, 69,182, 182, 192, 192 )JA 
6148 SYHBOL 152, 126, 126, 182, 192, 192, 192,8,8 DHE 
6159 SYHBOL 153,252, 252, 182, 182, 182, 192, 128, 128 >HK 


| 
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6169 SYHBOL 154,96,96,96,96,249,249,9,8 

6178 SYMBOL 155,248,248,96,96,96,96, 96,96 

6188 SYHBOL 156,98,98, 192,192, 254,254,8,8 

6199 SYMBOL 157,198, 198, 188, 198,56, 56,56, 56 
6298 SYMBOL 158, 198, 198, 198, 198, 198, 198,8,9 
6218 SYMBOL 159,9,9,68,68, 182, 182,6,6 

6228 SYHBOL 169,65,65,96, 96, 192, 192,69,68 

6239 SYMBOL 161,8, 8, 198, 198,238, 238, 254, 254 
6249 SYHBOL 162,214,214, 198, 198, 198, 198, 198, 198 
6258 SYMBOL 163,9,9, 192, 192, 192, 182, 126, 126 
6268 SYHBOL 164,192, 182, 192, 192,69, 69, 24,24 
6279 SYMBOL 165,9,9, 249, 248,96,96, 96,96 

6288 SYMBOL 166, 128,128, 192, 182,192, 192,252, 252 
6299 SYMBOL 167,9,9,254,254, 192, 192, 98,98 

6398 SYHBOL 168,96, 96,96, 96,96,96, 249, 248 

6319 SYMBOL 169,9,8, 198, 198, 198, 198, 198, 198 
6329 SYHBOL 179,56,56,56,56, 188, 198, 198, 198 
6338 RETURN 


TABLEAU BAS 


14 CLS:HODE 1 

28 DIM sc(11),na$(11) 

38 sc(1)=5888:na$(1)="DAVE" 

49 sc(2)=18888:nat(2)="STEEVE" 
58 sc(3)=15988:na$(3)="CHRIS" 
68 sc(4)=28888:nna$(4)="MIKE" 
78 sc(5)=25#88:na$(5)="IAN" 

88 sc(6)=38888:nn$(6)="NICK" 
98 sc(7)=35988:na$(7)="CYRIL" 
188 sc(8)=48998:na$ (8)="BOB" 
118 sc(9)=45889:nm$(9)="PETER" 
128 sc(18)=59989:nn$(18)="FRED" 
138 OPENOUT"SWAPLAX. REC" 

148 FOR a=1 TO 19 

158 WRITE 49,sc(a),nn$(a) 

168 NEXT 

178 CLOSEOUT 

188 END 


SVVAPDATA BAS 


UREELLEZEETEETENTENTENEEZEETEE 
28 ‘#4 DATAS POUR SWAPLAX.RTN #1 
KYRETTTEZTEZEELTETETEITEZLELIE 
48 NODE 2:adr-36864:n1=138 

58 RESTORE 139 

68 tot=8:FOR a=1 TO 15:READ af 


78 POKE adr, VAL("&"+a$):tot=tot+PEEK(adr):adr=adr+i 


86 NEXT:READ son$:IF VAL("&"+son$)(>tot THEN 129 
98 LOCATE 1,1:PRINT "LIGNE"; nl ; "CORRECTE" 

188 nl=ni+18:1F n1=2498 THEN 119 ELSE 68 

118 SAVE*SWAPLAX.RTN", b, 49899, &DD4 : END 

128 LOCATE 1,1:PRINT"LIGNE"; nl ;" INCORRECTE" :ENDe 


DER 
GB 
>GK 
)JF 
)JP 
)CB 
>GX 
)JE 
)NV 
)JA 
)JJ 
)EV 
>HU 
GP 
)GA 
)JU 
DIN 
)FFe 





138 DATA F5,21,E1,E9, 22, 39,99, F7,EB, 21, 4E, 98, 19, 4E, 23,68D } 72 DATA 32, 89,81,EB, 28, 82, ED, B8, 3A, 98,81, 4F, 2A,FE, 89, 497 


148 DATA 46, 23,79, B9,28, 14,E5,68,69, 19,E5, 4E, 23, 46,69, 591 
158 DATA 69,19,44,4D,E1, 71,23, 79,E1,16,E4,3E,C9,32,F8, 786 
168 DATA FF,F1,B7,29,83,32,69,81,21,34,81,CD, D4, BC, D8,6F1 
178 DATA 21,F8,FF,11,99,69,B7, ED, 52,39,46,21,FE,08,C3,6B7 
188 DATA 13,#5,81,17,81,21,93,91,C3,D1,BC, 24,99, 2B, 88, 2F5 
198 DATA 35,88, 49,99, 43,95, 46,89, 49,89, 17,81, 1A,91, 1D, 197 
288 DATA 91,29,91,23,91,26,81,29,81,2C,91,2F,91,32,81, 127 
218 DATA 78,81,89,81,8B,#1,9A,91,AC,91,B4,81,C2,91,D3,519 
228 DATA 91,E0,91,E7,81,ED,81,F9,81,F3,81,FB, #1, 8C, 92, 5A7 
236 DATA 8F,82,18, 82, 34, 92,54, 82,65, 92, 76,92, AF,92,CB, 318 
248 DATA 92, 2E,93,3A,83,49,93,51,93,62,83,65, 53,68, 83, 23F 
258 DATA 6B,83,6E, 83, 74, 83, 8B, 83,96, #3, A8, 83, AB, #3, B1, 48D 
268 DATA 93, BA,93,BD,83,C1,93,CB,83,F5,83,FE, 83, 16, 84,527 
278 DATA 6E,84,77,84,9A,#4,C2,84,CE, 54,88, 95, 2E, 98,66, SE7 
288 DATA 91,95,91,BA,91,07,81,98,82, A5,82,C7,82,5F, 83, 3F6 
299 DATA 76,83, AE, 83,F6, 83,55, #4, 5A, #4, 71,94,C9,94,E5,583 
388 DATA 94,F6,84,11,985,88,88,54,6F,6F,28,4C,6F, 77, SD, 3A5 
318 DATA 8A,99,98,89,42,61,64,29, 43,6F,6D,6D,61,6E,64, 3F# 
328 DATA 8D, 8A,34,81,C3,84,82,03,88,82,C3,2B,93,C3,EE, 47C 
338 DATA 93,03,67,84,C3,43,83,C3, 75,#1,C3, A9,91,C3,EA, 68D 
349 DATA 91,53,43,52,45,45,4E,53,57, 41,D8,53, 43,52, 45, 4A9 
359 DATA 45,4E,43,4F,59, D9, 42, 41, 4E, 4B,4F,58,45,CE, 42,55E 
368 DATA 41,4E,4B,57,52,49,54,C5, 42, 41,4E, 4B,52, 45, 41, 4D9 
378 DATA C4, 42,41, 4E, 4B, 46, 49, 4E,C4,56, 49, 45,D7,56, 44, 5D6 
388 DATA D5,56,44,55,B8, 88,FE, 81,02, 19,85, DD, 7E, 89, FE, 6A3 
398 DATA 92,D2,19,85,B7, 28,9F,CD,D8,#1,E5,F5, 2A,FB,88,67C 
498 DATA CD,85,BC,3E, C8, 18,9D,CD,D8,81,E5,F5, 2A, F9, 88, 754 
418 DATA CD, 85,BC,3E, 49, CD, 86, BC, F1,E1,C3,55,BD,FE, #1, 843 
428 DATA C2, 19,95,DD, 7E,88,FE,82,D2, 19,85, B7, 28, 8D, CD, 5D2 
438 DATA D8,81,3E, CS, CD, 86, BC, 2A,FB, 88, 18,8F,CD,D8,81,65A 
448 DATA AF,CD,5B, BD,3E, 48, CD, 88,BC, 2A,F9,98,C3,85,BC, 744 
458 DATA CD, 8B,BC,FE, C9, 25,94, 22,FB, 69, C9,FE, 49,C8,22,77C 
469 DATA F9,88,C9,FE,81,C2,18,85,CD, 11,83, D2, 19, 85, DD, 63D 
#78 DATA 7E,98,FE,FF, CA, 18,95, C3, 5B, BD, F5, AF, 18,93,F5, 7E9 
488 DATA SE, FF,32,FD,88,F1,CD,FC,82,D2, 18, 85, FE, 83, 28, 738 
498 DATA 6F,FE, 92,C2,19,85,91, 99, 49,69, 69, 11,99, CB, SE, 45F 
588 DATA FF, DD, BE, 89, 28, 1A, DD, BE, 82, 28, 1B, 81,88, 89,21, 4DE 
518 DATA 98,49,89,C5,81,98,81,CD, A4, 82,01, 84, CB, 75,28, 4AB 
528 DATA EF, C9, DD, 7E, #2, EB, 18,93, DD, 7E,98,FE,FF, C8, CD, 988 
536 DATA 5B,BD,F5, 3A, FD, 89,B7,29,95,F1,ED, B5, 18,23,F1, 7DA 
548 DATA C5,81,98,81,D5,11,F9,FF,ES,ED,B#,D1,E1,E5, 81, 8BF 
559 DATA 99,81,ED,B$,EB,D1,E5,21,F9,FF,91,99,91,ED,B8, 7F7 
568 DATA Ei,C1, 18, DE, C3,5B, BD, DD, 7E, 64, E6, 3F, 47, SE, 69, 744 
579 DATA 21,88,C9,89,EB, 21,89, 49,99, 01,99, 91,3E,FF, DD, 45B 
588 DATA BE, 89,28, A4, DD, BE, 82,28, A5, 11,F9,FF, DD, 7E, 89, 758 
598 DATA CD,5B, BD, F5, 3A, FD, 88, B7,29, 12,D5,E5,C5, ED, B8,916 
688 DATA Ci,D1,E1, DD, 7E, 82, CD, 5B, BD, ED, BS, 16, 87, CD, Di ,99F 
619 DATA 82,EB,CD,Df,82,F1,C3,5B, BD, D5,ES, 91,88, #8, ED, 881 
628 DATA B$,E1,DD, 7E,82,CD,5B,BD,ES5, 91,88, 99, ED, B9, Di, BA7 
639 DATA Ei,E5,D5, 81,89, 9$, ED, BS, D{, DD, 7E, 89, CD, 5B, BD, 8CA 
648 DATA 91,89,88,ED,B8,E1,C9,F5, DD, 7E, 82, B7, 26, SA, D6, 7D9 
658 DATA 92,38,86, C6, 84, FE, 98, 39, 1B, DD, 77,92,F1,F5,DD,674 
668 DATA 7E, #9,B7,26,8A,D6, 82,38, 96,C6,94,FE, 86, 39, 86, 483 
678 DATA DD,77,88,F1,37,C9,F1,B7,C9,FE, 91, C2, 18,95, DD, 869 
688 DATA 7E,81,B7,29,F7,DD, 7E,88,32,87,81,21,88,89, 22,425 
698 DATA 98,81,09,21,FF,FF,FE, 92,28, 14,FE, #3, 28, 19,FE,664 
785 DATA 94,02,18,85,DD,66,91,DD,6E, #8, 3D, DD, 23, DD, 23, 547 
718 DATA 22,81,81,CD,B7, 84, D2, 4E, 94, 22,FE, #8, CD,F5,84,586 














738 DATA EB, 7A,41,E6,C8,97,97,C6,94,4F,CD,5B,BD,B7,C2, 7D1 
749 DATA 41,84,CB,F2,CB, BA, 76,B7,28,8D,21,F9,FF,EB, 1A, 899 
758 DATA B7,28,83,BE, 28, 8D, 19,37, AF, CD, 5B, BD, ED,5B, 98,5F8 
768 DATA 81,C3,5D, 84, 2A,FE, 98, 3A,87,91,4F, 96, 99, 89, 36,325 
778 DATA 14,22,FE, 88, 2A,86,81,ED,5B,91,91,B7,ED,52, 38, 4DD 
788 DATA 9B, 19,23, 22,88,81,AF,CD,5B, BD, 18, A2, AF, CD, 5B, 597 
798 DATA BD, 18, 79,23, 13, 7D,B7, 28, BA, 7C, EG, 3F,29,B5,F6,6F5 
888 DATA 49,67, 79,3C,CD,5B, BD, 16, AB,FE, 82,26, 85,FE, 83,632 
818 DATA C2,18,85,CD,B7,84,39,52,E5,CD,F5, #4, EB, 28,94, 6A3 
828 DATA C5,ED,B8,C1,D1,7A,41,E6,C8,87,87,C6, 84, 4F, CD, 849 
838 DATA 5B,BD,B7,28,2A,21,F9,FF,CB,F2,CB, BA, 78,B7,28,6CB 
849 DATA 94, 7E,12, 19,86, AF,CD,5B, BD, 18,27,23, 13, 7B,B7,4E5 
858 DATA 28,F8,7A,E6,3F, 28, EB, F6, 48,57, 79,3C,CD,5B, BD, 7E1 
869 DATA 18,E1,CD,5B,BD,11,FD,FF,18,14,11,FE,FF, 16,9F, 74C 
879 DATA 11,FF,FF, 18,94, ED, 5B, 88,91, 13, ED, 53,98, 91, 1B, 4F9 
888 DATA DD, 6E, 92, DD, 66,93, 73,23, 72,C9,FE, 82, 28, 85, FE, 66F 
898 DATA 83,C2,19,85,CD,B7,84, 39,D9,E5, CD, F5, 94, Di, 7A, 761 
988 DATA 41,E6,C8,97,87,C6,84,4F,CD,5B, BD, B7, 28, BB, CB, 74D 
918 DATA F2,CB,BA, 78,B7,26, 94, 1A, 77,18, 9D,AF,CD,5B, BD, 714 
928 DATA CD,F5,84,28,B5,ED,BS, 18,B1,23, 13, 7B,B7, 29,E9, 77A 
939 DATA 7A,E6,3F,28,E4,F6, 49,57, 79,30, CD, 5B, BD, 18, DA, 7BC 
948 DATA FE, 82,28, 9D, DD,6E, 88, DD, 66,81, 22,88, 81, DD, 23, 4EF 
958 DATA DD, 23,34,87,81,47,ED, 5B, 98,81,21, 89,99, CB,38,3FE 
968 DATA 38,93, 19,38,98, 28,98, CB, 23,CB, 12,38,F1,B7,C9,528 
979 DATA 3A,87,91,5F,AF,57, ED, 54, 26,92, 38, F2,B7,ED, 52,638 
988 DATA 37,C9,3A,87,81,4F,4F,96,88,DD,6E, 99, DD, 66, 91,475 
998 DATA 7E,89,38,81,4F,23,5E,23,56,21,F9,FF, 79,B7,C9,6C3 
1889 DATA 21,8A,81,7E,23,CD, 5A, BB, FE, 6A, 29,F7,09,98,08, 4CE 
1919 DATA 89,09,99, 99,99, 66,99,08,98,99,90,98,99,95,98, 895 
1928 DATA 88,DD,5E,99,DD,56, 81, DD, 6E,92, DD, 66,93, 96, 98,519 
1938 DATA C5,E5,96, 92, 1A, 77,23,13,18,FA,E1,CD,26, BC, C1, 6D4 
1949 DATA 18,EF,C9,48,C9,49,C9,94,84,94,94, 44, 44, 44,44, 4EB 
1858 DATA 19,39,98,95, 08,88, 49,69, 09, 98,95, 96, 98, 88,99, 218 
1969 DATA 66,19,39,99,99,49,C9,49,49,99,64,09,04, 99,88, 2D8 
1978 DATA 44,89, 19,38,98, 68, 49,C8,48,48,99,94, 99,84, 89, 28C 
1989 DATA CC,88,44,19,30,99,99,99, 46,98,C9,99,8C, 94,04, 264 
1998 DATA 44,CC,95,44,99, 19,98, 08, 48, C8, 49,88, 54, 89,59, 248 
1189 DATA 9C,98,44,44, 44,19, 38,69, 88, 49,C5, 48, 49,94, 6, 29C 
1118 DATA 94,80, 44,44, 44,44, 18,38,08,98,49,C8, 88, 49,59, 2A8 
1125 DATA 54,98,96,09, 88,44, 85, 19, 99,08, 99,49, C9, 48,48, 268 
1139 DATA 84,94,94,9C, 44,44, 44,44, 19,39, 98,98, 49, C9, 49, 2A8 
1149 DATA 48,54,84,94,8C,09, 44,98, 44, 19, 39, 98,09, 96,98, 128 
1159 DATA 99,65,09, 00,09, 00,95,68, 68, 98,99, 28,98, 58, 89, BAG 
1169 DATA 96,98,99,09, 80,09, 09,09, 68,98, 69,69, 29, 15,59, 9B6 
1178 DATA 99,99,99,99,99, 98,95, 98,95,95,99, 688,99, 26,99,9A8 
1188 DATA 96,98,99,98,89,90,66,99, 99,08, 99,08,68,95,29, 8AB 
1199 DATA 19,99,99, 85,99, 88,94,99,98,98,98,98,98,80,99,114 
1288 DATA 96,99,98,99,69,49,46,94,64,09,94,98,08,98,80, 194 
1219 DATA 99,29, 95,98, 09, 85,99, 6B,98,98,98, 98, 95, 68,59, 1B8 
1228 DATA 98,09,28,988,99,49,C9,49,C9,04,84,94,64,44,CC, 348 
1235 DATA 44,44, 19,19,89,98,49,C8,48,C8,94,54, 94,94, 44, 2FC 
1249 DATA 86,44, 44,19, 38,99, 89,49,C9,49,C5,84,99,94,88, 358 
1259 DATA 44,88, 44,96, 19, 39,98,98, 48,88, 49,C8, 54, 54,84, 294 
1268 DATA 94,44,44,44, 44,18, 35,99, 98,49, C0, 49,C9,94,88, 358 
1278 DATA 84,99, 44,68, 44,98, 19, 38,99, 08, 48,C9, 49, C9, 84,358 
1288 DATA 99,94,96, 44, 68,44, 98,19, 89,98, 89, 49,C9, 48,C5, 324 
1299 DATA 84,94,94,95, 44,98, 44,44, 19,38,58,90, 49, 48, 49, 1D8 
1388 DATA 49,84,84,54,54,44,CC, 44, 44,19, 19,99, 89, 48,C8, 388 


20 





1318 DATA 69,69, 99,96, 95, 96, 95,68, 88, 68, 19,38,89, 89, 49, 229 
1328 DATA C9,69,88,90,96,89, 98,99, 68,08,68, 19, 29,08, 09, 298 
1338 DATA 48,49, 48,49,04,04,94,08, 44,88, 44, 44, 19, 19,89, 288 
1349 DATA 99,49,89,49,00,84,99,64,96,44,09,44,68, 18,39, 158 
1359 DATA 99,95, 46,49,49,CB,84,0C,94, 04, 44,44, 44, 44, 19, 2B8 
1368 DATA 19,99,69,49,49,49,49,64,8C,94,8C,44,CC, 44,44, 2CB 
1378 DATA 19,19,98,99,49,CB,48,49,94,94,94,94, 44, 44, 44, 27C 
1388 DATA 44,19,38,09,89,49,C9,48,C9,84,94,94,84, 44,CC, 3A4 
1399 DATA 44,98, 19,98,99,98,49,C8,48,C8,94,54,94, 84, 44,248 
1499 DATA 44,44,44,19,38,89,29,49,C6,49,C5,94,04,94,04,33C 
1418 DATA 44,88, 44, 44,19, 19, 98,98, 48,C8,48,C9,94, 89,94, 37C 
1429 DATA 98,44,CC,88, 44,19, 39,99, 96,49,C9,48,C8,98,98, 39C 
1439 DATA 69,96, 99, 88,99, 68,99, 29,98,98,48, 49,49, 49,94,23C 
1449 DATA 94,94,94,44, 44, 44, 44,19, 39,88,98,48, 49, 45,49, 25C 
1458 DATA 94,94,94,94,44,44,44,44,98,28,99,08, 49, 49,49,209 
1468 DATA 49,94,84,04,84,44,CC,44,CC, 19, 19,99, 08, 45,49,318 
1478 DATA 49,45,94,94,69,98, 99,68, 44, 44,18, 18,95, 89, 49,299 
1489 DATA 49,489,49,04,84,99,96, 99, 88,08, 88,96, 29,99,69,298 
1499 DATA 49,C5,99,49,99,94,98,08,68,68, 44,99, 19, 39,99, 258 
1599 DATA 99,90,99,09,99,09,96,09,89,09,00,06,09,98,66,086 
1519 DATA 99,09, 09,060,99,08,90,68,08,08,99,94,99,99, 89,999 
1529 DATA 99,96, 89,99,96,05,96,05,95,FF,06,09,69,98,98, 114 
1538 DATA 99,05, 09,060,08,08,98,08,99, 08,99,09,99,97,07,08E 
1549 DATA 97,95,86,96,85,95,85,FF,98,98,99,00,60,99,09, 126 
1559 DATA 99,09, 99,90,05,98,99,08,08,98,98,97,89, 89, 97,929 
1569 DATA 87,97,87,97,87,97,87,97,07,97,FF,08,09,09,68, 145 
1578 DATA 99,05, 68,08,09,08,90,08,99,98,98,99,99, 85,99, B8E 
1588 DATA 99,99,87,97,97,98,88,97,07,97,60,98,97,07,FF, 159 
1599 DATA 89,09, 09,00,06,98,69,08,98,99,08,99,99,00,90,898 
1689 DATA 99,99,95,99,87,99, 95,05, 96,98, 98,95, 05,07,97,956 
1619 DATA 97,97,07,97,FF,98,98,08,98,09,08,99,89, 89,69, 11B 
1629 DATA 99,99,98,00, 89,08, 98, 05,89,97,99,95,85, 96,85, 843 
1639 DATA 98,95,95,98,99,98,97,08,97,07,FF,08,99, 89,89, 126 
1649 DATA 99,99,88,00,09,09,89,90,96,09,98,97,07,98,08, 826 
1659 DATA 98,99,85,95,95,96,95, 06, 95,99, 98,99,97,FF,89, 13C 
1669 DATA 98,9A,8A,8A,85,99,89,00,99,08,06,08,68,98,06,936 
1679 DATA 96,08, 98,98, 98,98,98,95,95, 96, 96,95, 99, 99,99,953 
1689 DATA #7,FF,99,0A,96,99, 8A, 64, 86,09, 09,09,08,98,08, 12C 
1698 DATA 98,98, 98,96, 98, 98,96, 08,96, 98, 98,85,85, 86,85, 86D 
1788 DATA 68,09,80,07,07,FF,89,0A, OA, 9A, OA, 5A, OA, 98,08, 149 
1718 DATA 99,84, A, 98,66, 98, 98,98, 98, 06,96, 97, 96, 98,96, 873 
1728 DATA 95,95,85,05,85,FF, 89,99, 0A, OA, A, OA, BA, 9A,68, 154 
1739 DATA 84,99, 9A,07,97,68,98,98,97,97,97,98,97,98,98,86E 
1749 DATA 95,85,85,06,85,95,FF,09, 06,99, 9A,0A, DA, OA, 8A, 158 
1759 DATA SA, 8A,9A, 6,68, 08,97,97,97, 08,68, 98, 96, 88,88, 87D 
1769 DATA 96,95,85,86,96,05,85,FF,99,98, 99,09, BA, OA, OA, 145 
1778 DATA SA, 8, 9A,9A, 9A, A, 98, 06, 98, 98, 96, 98, 86, 58, 86, 884 
1788 DATA 96,88,85,06,85,95,95,95,FF,99,98,99, BA, OA, #A, 14C 
1799 DATA A, 5,98, SA, 8A,6A,9A, 0A, 98, 56,96, 98,88, 88, 96, 586 
1889 DATA 96,88,85,96,85,95,85,05,95,95,FF,99, 89,98, DA, 142 
1819 DATA BA, OA, A, OA, A, BA, SA, A, SA, SA, SA, SA, 96, 86, 88, 899 
1828 DATA 98,96,96,95,86,95,95,05,95,95,05,95,85,FF, 59, 144 
1839 DATA 99,08, 9A,8A, 9A, SA, SA, OA, SA, 58, BA, BA, BA, BA, BA, 888 
1849 DATA 96,98,96,98, 88,95, 86,95, 85,95,95,96, 66,05,95,95D 
1859 DATA 85,FF,98,68,99,69, 5A, DA, 8A, DA, 5A, DA, SA, BA, BA, 15E 
1869 DATA SA, 9A, 88,88, 86,98, 88,95, 85,05, 95, 96, 66,96, 66, 668 
1879 DATA 86,96,06,95,95,FF,98,98,08,08,98,9A, BA, BA, BA, 143 
1888 DATA SA, 8A,5A,5A, 86,96, 86,986, 98,95, 05,85,95,95,85,66E 
1899 DATA 66,96, 96,96, 96, 66,96,05,95,FF,98,88,88,08,89,133 
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1989 DATA 89,98, 8A, BA, SA, 8, BA, 8A, 986,88, 95,05,95,95, 66, 056 
1919 DATA 85,95,85,85,85,86,96,96,96,95,95,95,95,FF, 98, 144 
1928 DATA 68,988,89,08,60,99,99,0A,0A, 0A, 8A,0A,0A,95,55, 846 
1938 DATA 85,85,95,696,95,95,95,95,95,95,95,95,95,95,85,84C 
1949 DATA 85,FF,99,88,88,99,80,08,06,99, 60, 0A, DA, OA, BA, 12C 
1958 DATA SA, 9A,95,895,95,95,96,85,95,95,95,85, 85,85, 85,856 
1968 DATA 85,95,85,85,FF,99,99,99,98,08,99,05,09,08,68, 11B 
1979 DATA 98,95, SA, SA, #A, BA, 8A,05,95, 95,96, 95,25, 95,85, 868 
1989 DATA 85,95,85,95, 86,96, 95,05,FF, 98, 99,99, 09, 95,69, 129 
1998 DATA 99,95, 96,96, 98, 96, SA, BA, SA, DA, BA, A, 95, 85,85, 6B 
2889 DATA 95,85,85,95,85,96, 86,06, 96,96, 86,95,FF,99,98, 141 
2919 DATA 99,99,99, 60,09, 00,96, 08,986, 96,96, 5A, SA, BA, A, 848 
2928 DATA 9A,95,85,95,85,95, 55,95, 85,95, 86,96, 96,96,96, 855 
2939 DATA 95,FF,99,996,99,00,08,98,99, 98,98, 98, OA, SA, 89, 139 
2549 DATA SA, 0A, BA, 84, BA,05,85,95, 85,95, 95,05, 05,95,05, 864 
2959 DATA 85,85,95,95,95,FF, 99,08, 98, 98,99, 08, 58,58, 86, 128 
2868 DATA 98,96,86,98, 86,08, 68,95, 85,95, 95,95, 85,95,95, 858 
2878 DATA 95,95,95,95,95,95,95,95,95,FF, 98,08, 89, 89,89, 12C 
2988 DATA 56,99,89,68, 86,96, 98,96, 98,98, 96,05,85,95,95,954 
2898 DATA 85,85,95,95,95,85,95,05,95,95,95,85,FF, 59, 89, 13B 
2189 DATA 68,09,88,08,80,09, 996,99, 99,08, 96,98, 98,98,95, 82D 
2119 DATA 66,95,95, 96,96, 96,95,95,95, 96,96, 86, 96, 85, 85,953 
2128 DATA 95,FF,89,99,80,00,90,09,90,09,00,09,69,08,98, 114 
2138 DATA 96,686, 98,95, 96, 85, 96,96, 96, 95,95, 95,95, 86, 86, 5A 
2149 DATA 96,96,86,95,85,FF, 99,09, 99,90,966,09,09,95,88, 11B 
2158 DATA 99,09, 98, 98,98, 98, 98,95,95,95,95,95,95,85,85,859 
2169 DATA 95,95,85,95,85,85,85,05,FF,98,80,98,60,98,08, 127 
2178 DATA 98,99, 99,05,99,68,98,98,96,98,99,95,95,95,85,82C 
2188 DATA 95,95,85,95,95,05, 85,05, 95,95, 95,FF, 08,98, 09, 136 
2198 DATA 99,89,98,95,09,96,98,99,908,99,99,98,99,09,99,099 
2288 DATA 55,95,95,96, 86,96, 86,95, 85, FF, 99,99, 90,96,98, 138 
2219 DATA 09,69,08,09,00,90,99,99,98,99,98,08,98,05,85, 09 
2226 DATA 66,66,86,96,95,85,85,FF, 69,08, 99,06, 09,06,09, 126 
2239 DATA 99,99,96,99,99,88,06,68,68,98,99,05,85,86,86,516 
2248 DATA 96,86,95,95,85,FF, 96,99, 60,08, 00,06,09,00,00,11A 
2259 DATA 98,89,06,99,99,68,99,98,95,95,95, 05,96, 96,85, 825 
2268 DATA 95,85,95,08,89,99,95,96,98,FF, 99,90,09,98,89, 11E 
2279 DATA 99,99,98, 95,98, 9B,99,08,98,88,98,95,95, 96,95,915 
2288 DATA 95,95,85,95, 85,95, 95,99, 89,09, 96,98,68,FF, 09, 13A 
2298 DATA 98,85,98,05,98,68,95,98,98, 99,00, 08,99, 90, 99,808 
2388 DATA 95,95,86,96,85,85,95,95, 86,95, 95,98,95,95,85, 949 
2318 DATA 86,98,FF,98,66,99,98,09,98,99,98,98,96, 99,95, 19F 
2328 DATA 99,09,90,09,85,95,95,95, 95,05, 95,95, 96, 95,85, 938 
2339 DATA 85,95, 96, 86,98, 98, 98, FF, 98, 08,98, 98,99, 99,99, 12D 
2348 DATA 98,06,99,00,96,00, 66,68, 05,95,96,05,95,05,08, 91F 
2358 DATA 95,85,85,95,95,66,96,95,95, 58,96, 98,FF, 89,89, 146 
2368 DATA 98,09,99,90,86,00, 69,09, 99,09,09,98,69,95,06,98B 
2375 DATA 96,85,95,09,98,95,95,85,85,95,95,05, 85,88, 89,838 
2388 DATA 96,96,FF,98, 88,06, 89,09,69,08,95,99,98,96,86, 117 
2398 DATA 99,99,95,05,96,85,95,08,98,58,99,95,95, 96,85, 82F 
2488 DATA 95,85,99,95, 89,98, 88,FF, 99,98, 99,99,09,08,68,119 
2418 DATA 86,99,95, 96,06, 88,98,85,96,95, 95,98, 65,9, 89,92D 
2428 DATA 96,85,85,96, 95,00, 99,99, 08,09, 99,98, 98,FF,68, 124 
2438 DATA 99,99,99,95, 89,60, 95,09, 98, 58,96, 98, 96, 98,96, 926 
2448 DATA 95,99,99,09,88,90,68,98,85,05,FF,99,09,08,68,18E 
2455 DATA 89,99,99,95,99,98,98,98,96, 58,96,98,95,FF,89, 124 
2468 DATA 98,99,88,09,89,00,99,99,98,09,95,98,98,98,08, 918 
2479 DATA FF,08,98,99,99, 68, 99,68,98,98,98,99,08,96,80,8FF 
2488 DATA 56,96,FF,FC, 99,09, 89,09, 99,09,09,09,00,05,08, 28B 
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pes 


GHOSTBUSTER III 






l s'agit d'un jeu d'action pur jus. 

Avancer et tirer dans le tas. Plus 

facile à dire qu'à faire quand les 
ennemis sont si nombreux. 


Le but est simpliste, nettoyer neuf 
salles de château de tous les fantô- 
mes qui s'y trouvent. 


Pour l'aider dans sa tâche, le joueur 
trouvera des sortilèges dans les car- 
tons qui Jonchent le sol, 


Clé : pour passer au tableau suivant 
(porte apparaît côté droit). 
Laser : régénère les munitions. 





38 REX : PRESENTATION 

48 REX : 

SE REM srssssspseseenencenese 
68 DEFINT a-z 


78 ENV 4,4,-1,5:EVERY 15,2 GOSUB 678 


Claude LE MOULLEC 


Valable pour CPC 464 - 664 - 6128 





Pendule : donne du temps supplé- 
mentaire. 


Sens interdit : stoppe les fantômes 





pendant un laps de temps. 
Têtes de mort : contact mortel. 


Voici les fichiers qui compose le jeu : 
GHOSTI : (basic) présentation fa- 
cultative 

GHOST2 : (basic) corps principal du 
jeu 

GHOSPRIT : (BIN) début &8000 lon- 
gueur &12A0, fichier des sprites 
GHOSROUT : (BIN) début &9D20 lon- 
gueur &570, fichier des routines LM 
DATA : (basic) fichier de datas pour 
GHOSPRIT 

DATA2 : (basic) fichier de datas pour 
GHOSROUT 


88 SYNBOL AFTER 32 

98 SYMBOL 33,9,8,9,9,8,129, 78,99 

188 SYMBOL 34,56,64,56, 32,79,57,9,8 

118 SYHBOL 35,9,9,8,1,3,6, 14,39 

128 SYMBOL 36,31,63, 126, 124, 129, 112,96 
138 SYHBOL 37,192, 8,1,2,38, 158, 79,63 

149 SYMBOL 38,63,63,31,31,15,7,3,1 

158 SYMBOL 39,3,9,7,2,9,8,8,8 

168 SYMBOL 49,38, 68, 192, 128,3,9,3,3 

176 SYHBOL 41,8,9,8,7,6, 18, 29,32 

189 SYMBOL 42,8,1,199,63, 127, 255,255,255 
199 SYHBOL 43,255, 253,241,246, 248,254,255,255 





o 288 SYMBOL 44,255,63,63,15,1,9,8,8 )AP 

218 SYMBOL 45,5,48, 72,135, 1,158, 79,15 )CF 

228 SYMBOL 46,297, 143,7,7,3,2,3,2 UT 

238 SYHBOL 47,4,4,8,9,1,7,15,63 DXK 

248 SYMBOL 48,255, 255,255, 255, 252, 249, 192, 128 )LR 

259 SYHBOL 49,9,224,38,8,9,9, 193,255 )BX 

)TY 269 SYMBOL 59,255,255,255,255, 255,255, ÿ, 8 >GH 

DK | 278 SYMBOL 51,255,254, 248,249, 128,9,6,8 )EQ 

>XH 288 SYMBOL 52,9,9,9,9,9,0, 192,249 )2M 

>PC | 299 SYMBOL 53,9,9,8,192,64, 192,9,9 AN 

>BQ | 388 SYMBOL 54,192,64, 192, 9,9,0,8,8 )AN 

HV | 319 SYHBOL 55,254,255,255,255, 255,63, 143, 119 KW 

DYC | 328 SYMBOL 56,1,1,3,7,15,63,255,255 )BT 

)BP | 338 SYHBOL 58,248, 244,196,9,14,9,9,8 CG 

XF | 349 SYMBOL 59,15, 31,63, 255,255, 255, 255, 252 )HK 

)DC | 359 SYHBOL 69,252, 252,248,248, 248,224, 192, 128 )LJ 

)CE | 368 SYMBOL 61,9,9, 128, 192, 224, 249, 248,252 )GY 

DAC | 379 SYMBOL 62,252, 254,254,255, 252, 249, 1,3 GC 

DVE | 388 SYMBOL 63,1,9,3,249, 125,127, 126, 254 )EZ 

)BU | 399 NODE 1:BORDER 26: INK 9,26:PAPER #:INK 1,6:INK 2,25: DFU 
DB INK 3,8 

)FA | 489 FOR H=2 TO 4ÿ STEP 8:Y=1:X-H:GOSUB 449:Y=19:G0SUB 4 DHA 
)LV @ 48:NEIT 
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418 FOR H=7 T0 17 STEP 6:X=2:Y=H:GOSUB 448:X=34:G0SUB 4 DHF 
AB:NEXT 

429 FOR H=128 TO 512 STEP 4:PLOT H,128,3:DRAU H,272:PLO >PQ 
T 638-H,128:DRAW 638-H, 272 :NEXT 

438 SYHBOL AFTER 32:G0T0 518 NT 
449 LOCATE X,Y:PEN 1:PRINT SPC(2);CHR$(41);CHR$(45); CHR >GK 
$(52) 

458 LOCATE X,Y+1:PRINT SPCC1);CHR$ (35) ;CHR$ (49) ;CHR$(46 DAT 
);CHR$ (55) ;CHR#(61) 

468 LOCATE X,Y+2:PRINT CHR$(33) ;CHR$(36) ; CHR (39) ;CHR$( DRU 
47) ;CHR$ (59) ;CHR$ (62) ;CHR$ (53) 

478 LOCATE X,Y+3:PRINT CHR$(34) ;CHR$(37) ;CHRS (42) ;CHR$( RU 
48) ;CHR$ (58) ;CHR$ (63) ;CHR$(54) 

489 LOCATE X,Y+4:PRINT SPC(1);CHR$ (38) ;CHR$(43) ;CHR$(49 D AJ 
);CHR$ (56) ;CHR$ (68) 

499 LOCATE X,Y+5:PRINT SPC(2);CHR$ (44) ;CHR$ (59) ;CHR$(51 BU 
} 


589 RETURN )ZA 
519 OUT &BCS9,6:OUT &BD99,24 >VA 
528 a$="GHOSTBUSTER" :y=249:ENC=1:t=8:GDSUB 579 )RT 
538 y=238:ENC=2:t=1:G0SUB 57#:LOCATE 1,25:PRINT SPACES( DET 
28) 

548 a$="111":y=18#:ENC=2:t=9:GOSUB 579:y=178:ENC=1:t=1: DMG 
GOSUB 578 

559 LOCATE 1,25:PRINT SPACES (28) :OUT &BCS8,6:OUT &BD8D, >BA 
25 

568 MHILE INKEY$="":WEND:G0TO 728 )BP 
578 A:LEN(A$):P=A#8:IF t=8 THEN 598 )BC 
589 x=(646-A432)/2:G0T0 688 UZ 
598 x=(639-Ax32)/2 )LY 
689 PEN 2:LOCATE 1,25:PRINT A$;:PEN 1 >DH 
619 trx=x:y2=14 )BC 
629 FOR i:i TO 8:x2=8:FOR j=1 TO P )2E 
639 1F TEST(x2,y2)=2 THEN PLOT x,y, ENC:PLOT x,y-2:PLOT )ZB 
142,y:PLOT x+2,y-2 

649 x=xt4:x2=x2+2:NEXT j TG 
659 y=y-4:y2=y2-2:x=tx:NEXT i:RETURN )GR 
668 NEXT i:RETURN )ND 
678 READ a,b:1F a=-1 THEN RESTORE 698 :RETURN HU 
688 SOUND 1,a,28,15,4:SOUND 2,b,28, 15, 4:RETURN >PN 


698 DATA 89, 199,89, 113,89, 119,89, 134,67, 75,67,84,67,89, DAT 
67,199,198, 113,198, 119, 199, 134, 189, 159, 75,84, 75,689,75,1 
99,89, 89, 189, 159, 199, 134, 199, 119, 198, 113,89, 134, 89 

788 DATA 119,89, 113,89, 199, 75, 113,75, 189, 75, 89, 75, 84,67 DHB 
, 189, 67,89,67,84,67, 75,67, 75,67,84,67,89,67, 188 

718 DATA 75,84,75,89, 75,198, 75, 113,89, 198, 89, 113,89,119 >HZ 
» 89,134, 199, 113,189, 119, 189, 134, 189, 159, -1,-1 

729 BORDER #:MODE 1:1NK #,8:1NK 1,26:INK 2,13:INK 3,15 NT 
738 LOCATE 14,2:PEN 1:PRINT "GHOSTBUSTER 111":LOCATE 14 >XG 
| S:PEN 3:PRINT "=====2222222222set 

748 PEN 2:LOCATE 1,6:PRINT" Enfer et dannation ! Le c >TX 
hateau de sasère est envahi par les fantoses." 

758 PEN 2:LOCATE 1,9:PRINT" Heureusement que mon las >FL 
er à plouchksodèle BB18 modifié BC26 est une arnered 
outable." 

769 LOCATE 1,13:PRINT" Mais les sunitions elles,ne s JR 
ont paséternelles.Pourtant je sais que dans lesvieux ca 
rtons qui parsèsent les lieux jetrouverai tout ce qui nm 
est nécessaire." 
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778 LOCATE 1,18:PRINT" De nouveaux lasers biensur, de >GH 
s clefspour passer les portes et bien d’autressortilèg 
es..." 

768 LOCATE 1,22:PRINT" 

e à lafin de sa quète ?" 
799 LOCATE 32,25:PEN 1:PRINT "<ENTER)" 
898 WHILE INKEY$="":WEND :RUN"GHOST2" 


Mais serai-je vivant ou fanton >CK 


FT 
GA 





| D2E 


28 REX )EB 
38 REN GHOSTBUSTER 111 )VA 
49 REX )ED 
58 REX BY )BA 
68 REH )EF 
78 REX CLAUDE LE MOULLEC : JD 
88 REX 83 RUE JOLIOT CURIE : XL 
98 REN : 22429 PLOUARET DTA 
189 REM : TEL 96 38 94 24 )QH 
119 REH : : XKF 
129 REM sossssgesgeeeecesenenesee )2Q 
139 MEMORY &7FFF )LZ 
148 LOAD "GHOSPRIT", 48998 JUA 
159 LOAD "GHOSROUT", &9D28 JUN 
169 REM sssssesesessesessentes )YJ 
178 REH ! >KK 
188 REM : VARIABLES DE BASE : JHU 
198 REH : ; )LB 
289 REM srssssseressenesseee )YD 
219 DEFINT A-Z:CALL &BBFF:MODE #:BORDER # )JB 
229 RESTORE 238:FO0R H=8 TO 15:READ A:INK H,A:NEXT )RZ 
239 DATA 8,26,11,2,4,16,6,3,18,9,17,13,28,1,24,15 JNH 
248 DEF FN POCX,Y)=4C198+(Y-1)#168+(X-1)#4 )HX 
259 DEF FN Iplx,y)=&C898+(y-1)#88+(x-1)#2 )GU 
268 DEF FN pok(a,b)=&A#33+(b-1)#28+a:but=&AÎEC )NX 
219 DIM SP(48):FOR H=8 TO 34:SP(H+1)=&B8AAS+(H#64) :NEXT >XH 
288 DIM CAIS(38) :ENV 1,199,3,1:ENT 1,198,2,2 )JC 
299 ENV 2,19,-1,2:ENT 2,19,-2,2:ENV 3,5,-2,18 XKJ 
388 ENV 15,1,5,1,19,1,4,5,-3,1:ENT 14,49,-19,1 YKD 
319 ENV 14,1,5,1,18,1,4,5,-3,1:ENT 15,5,-29,1,69,19,1  DTK 
328 MUN=16:VIE=5:TA=1 )QF 
338 REH ssssssseseesessestest >YH 
349 REM ; XKJ 
359 REM :  DECOR DE BASE : RU 
368 REH : ; )LA 
379 REM sessssseseesessestests )YH 


388 POKE &AB1A,4#:POKE &A922,68:CALL &ABSD, &CH86, 48898 UN 
398 POKE &ABLA,8:POKE &A922,4:FOR h:1 TO 29:CALL &ASBD, )CV 
FN poth,1),sp(5):POKE FN pok(h, 1),1:NEXT 

489 POKE &AB1A,16:CALL &ASBD,FN po(i,1),sp(1):CALL &Aÿ9 ND 
D,FN po(28,1),sp{2) 

418 FOR h=2 TO 19:CALL &ASBD,FN po(i,h),sp(3):POKE FN p )Kk 
ok(1,h),1:POKE FN pok(28,h),1 

428 CALL &ASBD,FN po(28,h),sp(4):NEXT:POKE &AS1A,8:F0R HG 





h=1 TO 28 

438 CALL &ASBD,FN poth,19)+88,sp(5)+32:POKE FN pok(h, 11 >BD 
),1:NEXT:POKE &AB1A, 16 

449 DEF FN PO(X, Y)=&C148+(Y-1)#168+(X-1)#4 HU 
459 SC=D:GOSUB 2469:REC=6:GOSUB 2539:G0SUB 2688:G0T0 54 >BC 
ÿ 

469 A$=UPPERS(A$):FOR T=1 TO LENCA$):PC=(ASC(MIDS(A$,T, DHZ 
13))-48 

478 1F PSC4 THEN PS=43 

488 CALL &9D28,FN LP(ZL, YL)+(T#2)-cer,&9D48+ (PS#16) :NEX 
T:RETURN 


>QN 
)HH 


499 REM sessesteseeseenessesce )YQ 
588 REX : KG 
519 REM : BRANCHEMENT TAB >VK 
528 REX : XKJ 
539 REM :sssssseseseseneesesee )YK 
549 ON TA GOTO 558,569,579,589,598,689,619,628,639,648 >VH 
558 RESTORE 2774:G0SUB 788:GOT0 1968 )DZ 
568 RESTORE 2798:GOSUB 799:GO0T0 1969 )DC 
578 RESTORE 2828:G0SUB 789:GO0T0 1968 )DX 
588 RESTORE 2858:GO0SUB 798:G0T0 1869 >DB 
599 RESTORE 2888:G0SUB 788:G0T0 1968 )DF 
698 RESTORE 2989:GO0SUB 798:G0T0 1869 )DP 
618 RESTORE 2948:G0SUB 788:G0T0 1968 DV 
628 RESTORE 2988:GOSUB 799:GO0T0 1968 >DA 
638 RESTORE 3928:GO0SUB 799:GO0T0 1968 )DL 
648 GOTO 648 :END )LU 
658 REM ssssssessesssessesses DYN 
669 REM : LD 
678 REM : DESSIN TABLEAU UP 
688 REM : )LF 
698 REM ssssssssesessesseseese )YT 
788 GOSUB 2799:FO0R T=1 TO 2589:NEXT:GOSUB 2698 )NX 


719 POKE &ASAB,1:FOR G=2 TO 18:FOR H=2 TO 19:P0KE FN PO DTZ 
KCH,G),9:NEXT H,G 


729 READ LG:FOR H={ TO LG:READ A,B,C )CL 
738 FOR G=A TO B:CALL &ABBD,FN PO(G,C),SP(7) XKG 
748 POKE FN POK(G,C),1:NEXT G,H )2D 
754 READ LG:FOR H={ TO LG:READ A,B,C )CP 
768 FOR G=A TO B:CALL &AB#D,FN PO(C,G),SP(7) >KK 


778 POKE FN POK(C,G),1:NEXT G,H:FOR H=1 TO 38:CAIS(H)=8 DFT 
:NEXT 

789 READ CAI:CA=9:FOR H=1 TO CAI >ZB 
798 x=INT(RND#16)+3:y=INT(RND*9)+2: IF PEEK(FN POK(X,Y)) >PD 
O9 THEN 799 

849 CALL &ASBD,FN polx,y),5p(8):POKE FN POK(X,Y),2:NEXT DAC 


618 FOR h=but TO but+58:POKE h,B8:NEXT:debut=but:FOR h=1 HF 
TO 1# 

828 a=INT(RND#15)+5:b=INT(RND#1#)+1:1F PEEK(FN pok(a,b) )PD 
)C8 THEN 828 

838 POKE FN pok(a,b),h+18:CALL &AG@D,FN pola,b),sp{15) )XB 

849 POKE debut, 1:bf$=HEX$(FN pok(a,b),4):v2=VAL("&*4#RIG DPV 

HT$(bf$,2)) 

859 v{=VAL("L"+LEFTS$(bf$,2)):POKE debut+1,v2:POKE debut )GY 
+2,vi 

868 add=FN pola,b):bf$-HEX$ (add, 4):v2=VALC"&"+RIGHTS(bf >GK 
$,2)) 


é 
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878 vI=VAL("&"+LEFTS(bf$,2)):POKE debut+3,v2:POKE debut )GE 
+4,vi 


889 ss=INT(RND*4)+1:POKE debut+5,ss:debut=debut+6 >XN 
698 NEXT:POKE &A933,8:X=2:Y=6:POKE FN POK(X, Y),18 DUC 
989 CALL &KASBD,FN PO(X,Y),SP(19) :AC=19:SS=4 )LQ 
918 CLE=INT(RNDA4CAI )+{:CAIS(CLE)=1 )DE 


928 STO=INT(RNDKCAI)+1:1F CAIS(STO)C)8 THEN 928 ELSE CA DLL 
IS(STO)=3 
939 PEM=INT(RNDXCAI)+1:1F CAIS(PEM) O8 THEN 938 ELSE CA DLZ 
IS(PEM)=4 


949 READ FUS:FOR H=1 TO FUS DVJ 
958 FU=INT(RND#CAI)+1:1F CAIS(FU)C>8 THEN 958 NU 
968 CAIS(FU)=2:NEXT >PH 
978 READ NOR:FOR H=1 TO MOR )VH 
989 HO=INT(RND4CAI)+1:1F CAIS(MO)<>8 THEN 988 )KC 
998 CAIS(MO)=5:NEXT:READ ENN )YZ 
1898 GAN=8:TP-16:ca:9:TP=16:G0SUB 2658:RETURN )Q2 
1919 REM sesseseseseesescesese )YM 
1929 REX : : )RB 
1938 REM : ROUTINE PRINCIPALE : )ZK 
1849 REX : ! >RD 
1959 REM :sssssssseseseseeesess )YR 
1869 EVERY 15 GOSUB 1148:EVERY 299,2 GOSUB 2678 >NG 
1978 IF PEEK(&A933):1 THEN 2199 >XN 
1889 IF INKEY(#)*INKEY(72)=8 THEN SS=1:GO0T0 1168 )QR 
1898 IF INKEY(2)#INKEY(73)=9 THEN SS=2:G0TO 1249 QU 
1198 IF INKEY(8)#INKEY(74)=8 THEN SS=3:G0T0 1328 )Q 
1119 IF INKEY(1)#INKEY(75)=9 THEN SS=4:G0TO 1499 )QP 
1128 IF INKEY(9)4INKEY(76)=8 THEN 1529 DEJ 
1138 GOTO 1978 )MA 
1148 DI:CALL &A228:EI :RETURN DXX 
1158 REM ::: HAUT ::: )NY 
1168 DI:1F AC<>16 THEN CALL &ABOD,FN PDIX, Y),SP(16) >UB 
1179 A=PEEKCFN POK(X,Y-1)):1F AOS THEN EI :BX=X:BY=Y-12 DLJ 
GOTO 1989 

1188 CALL &ABOD,FN PO(X, Y),SP(9):POKE FN POK(X, Y),8 )VB 
1198 CALL &ABBD,FN PO(X,Y)-88,SP(16):FOR T=1 TO 5S9:NEXT DYX 
1295 CALL &ABBD,FN POCX, Y)-89, SP(9):CALL &ABBD, FN PO(X, DMD 
Y-1),SP(16) 

1218 Y=Y-1:POKE FN POK(X,Y),18:FOR T=1 TO 4B:NEXT:EI )NQ 
1228 SOUND 1,399,5,1,1,1,15:GO0T0 1879 )CJ 
1238 REM ::: BAS ::: DE 
1249 DI:IF ACC)22 THEN CALL &A9BD,FN POUX, Y), SP(22) )TC 
1258 A=PEEK(FN POK(X,Y+1)):1F AC8 THEN EI :BX=X:BY=Y+1: LD 
GOTO 1988 

1268 CALL &ABSD,FN PO(X, Y),SP(9):POKE FN POK(X, Y),8 >VA 
1278 CALL &A9BD,FN PO(X,Y)+88,SP(22):FOR T=1 TO 58:NEXT )YQ 
1288 CALL &ABBD,FN PO(X,Y)+89, SP(9):CALL &ABBD, FN PO(X, ME 
Y+1),SP(22) 

1298 Y=Y+1:POKE FN POK(X,Y),18:FOR T=1 TO 4:NEXT:EI NX 
1399 SOUND 1,388,5,1,1,1,15:G0T0 1878 >CH 
1318 REM ::: À GAUCHE ::: >RF 
1328 DI:IF ACC25 THEN CALL &AGBD,FN POUX, Y),SP(25) >TH 


1339 A=PEEK(FN POK(X-1,Y)):1F AC9 THEN EI:BX=X-1:BY=Y: DLG 
GOTO 1988 





>UH 
1359 CALL &ABBD,FN PO(X,Y)-2,SP(25):FOR T=1 TO SB:NEXT >XN 


1349 CALL &ABSD,FN POCX, Y),SP(9):POKE FN POK(X, Y),8 


1368 CALL &ABD,FN PO(X,Y)-2,SP(9):CALL &ASBD,FN PO(X-1 DLR 
»Ÿ),SP(25) 


1378 X=X-1:POKE FN POK(X,Y),18:FO0R T=1 TO 4B:NEXT:EI DT 
1388 SOUND 1,389,5,1,1,1,15:G0T0 1979 )CR 
1398 REM ::: A DROITE ::: RT 
1489 DI:IF ACC)19 THEN CALL &ABBD,FN POUX, Y),SP(19) DUE 
1419 A=PEEK(FN POK(X#1,Y)):IF ACS THEN EI:BX=X+1:BY=Y: >LB 
GOTO 1989 

1428 CALL &ABBD,FN PO(X,Y),SP(9):POKE FN POK(X,Y),8 >UG 
1439 CALL &AB8D,FN PO(X,Y)+2,SP(19):FOR T=1 TO SB:NEXT )XN 


1448 CALL &ABBD,FN POCX,Ÿ)+2,SP(9):CALL &ASBD,FN PO(X+1 LP 


»Ÿ),SP(19) 


1458 I=X+1:POKE FN POK(X,Y),18:FOR T=1 TO 4B:NEXT:EI WT 
1469 SOUND 1,389,5,1,1,1,15:G0T0 1978 )CQ 
1479 REM sssssssssssessestestes )YY 
1489 REM : )TB 
1498 REX : FEU >K 
1598 REM : RE 
1519 REM sssesssssesssseesentes )YT 
1529 IF MUNC1 THEN 1978 ELSE MUN-MUN-1:GOSUB 2628 RG 


1538 SOUND 4,8,-1,15,3,,39:0N SS GOTO 1558,1698,1659,17 >YD 
98 

1549 REM ::: FEU VERS HAUT ::: )XA 
1559 CALL &ABOD,FN PO(X,Y),SP(17):FE=1 )FP 
1569 A=PEEK(FN POK(X,Y-FE)):1F AOS THEN FX=X:FY=Y-FE:G DKK 
OTO 1798 

1578 CALL &ABSD,FN PO(X, Y-FE),SP(18):FOR T=1 TO 2B:NEXT )YL 


1589 CALL &ABD,FN PO(X,Y-FE),SP(9):FE=FE+1:G0T0 1569 XF 
1599 REH ::: FEU VERS BAS ::: JR 
1699 CALL &AB#D,FN PO(X,Y),SP(23):FE=1 )FG 


1618 A=PEEK(FN POK(X,Y+FE)):1F AOS THEN FX=X:FY=Y+FE:G 3KB 
OTO 1798 
1628 CALL &ABSD,FN POCX, Y+FE),SP(24):FOR T=1 TO 28:NEXT )YB 


1639 CALL &AD9D,FN PO(X,Y+FE),SP(9):FE=FE+1:G0T0 1619  >XV 
1649 REH ::: FEU À GAUCHE ::: VX 
1659 CALL &AD#D,FN PO(X, Y),SP(26):FE=1 )FQ 


1669 A=PEEK(FN POK(X-FE,Y)):1F AOS THEN FX=X-FE:FY=Y:G DKL 
OTO 179$ 
1679 CALL &ABBD,FN POCX-FE, Y),SP(27):FOR T=1 TO 2B:NEXT DYH 


1688 CALL &ADOD,FN PO(X-FE,Y),SP(9):FE=FE+1:G0T0 1669 )>XH 
1698 REM ::: FEU À DROITE ::: DVF 
1789 CALL &ADBD,FN PO(X,Y),SP(28):FE=1 )FE 


1719 A=PEEK(FN POK(X+FE, Y)):1F AOS THEN FX=X+FE:FY=Y:G DKC 
OTO 1798 
1728 CALL &ABSD,FN POCX4FE, Ÿ),SP(21):FOR T=1 TO 2B:NEXT )YZ 


1739 CALL &AB8D,FN PO(X+FE, Y),SP(9):FE=FE+1:G0TO 1718  DXX 
1748 REM ssssssesseseesesesse YY 
1758 REX : )TB 
1768 REM : CONTACT FEU )RZ 
1778 REM : : )TD 
1788 REM sssscsssseseesesteses »C 


1798 IF A)18 THEN DI:GO0T0 1818 D 0) 





| 


1898 IF A=2 THEN 1879 ELSE 1979 DL 
1819 POKE FN POK(FX,FY),#:POKE BUT+(CA-11)6),0:El UM 
1828 CALL &ABAD,FN POCFX,FY),SP(19):FOR T:1 TO 4D:NEXT DZR 
T 

1838 CALL &ABAD,FN POCFX, FY),SP(11):FOR T:1 TO 4B:NEXT DZU 
T 

1848 CALL BABSD,FN POCFX,FY),SP(9):ENN=ENN-1:1F ENNC19 DKD 
THEN 1978 

1858 add=BUT+((A-11)46):POKE add, 1:POKE add+1,4SA:POKE NZ 
add+2, &AŸ:POKE add+3,428:POKE add+4, &C2:POKE add+5, INT( 
RNDX4)+1:G0T0 1878 

1868 REM ::: CAISSE TOUCHEE ::: >YA 
1879 CA=CA+1:CALL &ABBD, FN PO(FX,FY), SP(19):FOR T:1 TO )JJ 
AB:NEIT T 

1888 CALL &ABSD,FN POCFX,FY),SP(11):FOR T=1 TO 49:NEXT )ZZ 
1 

1898 CALL &ABSD,FN PO(FX, FY), SP(9) )BQ 
1989 A=CAIS(CA):1F A=# THEN POKE FN POK(FX,FY),8:GOT0 1 CL 


578 
1918 CALL &ABOD,FN PO(FX,FY),SP(27+A):POKE FN POKCFX,FY DFW 
),2+A 


1928 GOTO 1979 >MH 
1939 REM ssssssreseesessessesse )YZ 
1949 REM : TC 
1959 REM : CONTACTS DIVERS )WB 
1968 REX : TE 
1978 REM sssssssesesessessesses >YD 
1988 IF A>19 THEN 2198 ELSE IF A3 THEN 1878 >6Q 


1999 CALL &ASSD,FN PO(BX,BY),SP(9):POKE FN POK(BX,BY),8 )ZR 


2858 A=A-2:0N À GOTO 2919,2928, 2839, 2969, 2976, 2988 )QD 
2518 SOUND 1,1542,38,15:CALL &AS9D,FN P0(28,6),SP(6):PO >GG 
KE FN POK(28,6),8:G0T0 1978 

2929 HUN=MUN+16:G0SUB 2688:FOR h=1 TO 18:SOUND 1,25#h,4 )CE 
,15,3,4:NEXT:G0TO 1978 

2835 MU=RENAIN(S): AFTER 588,1 GOSUB 2959 GC 
2549 SOUND 1,28,25,15,2,5,19:G0T0 1978 )DA 
2858 SOUND 1,258,18,15,1,2,1:EVERY 59 GOSUB 1148:RETURN DYL 


2969 TP=16:G0SUB 2658::FOR h=1 TO 18:SOUND 1,25xh,4,15, DWN 
3,4:NEXT:GOTO 187$ 


2879 CALL &ABSD,FN PO(BX, BY), SP(32) :GOTO 2198 >HG 
2888 CALL &AS8D,FN PO(BX, BY), SP(6):POKE FN POK(BX,BY),1 )ZE 
2898 GAN=1:GO0TO 2188 >NP 
2189 FOR H=8 TO 3:MU=REMAIN(H) :NEXT )DU 
2119 REM ssssssssssseeseseesses >YP 
2128 REM : )RD 
2139 REM : FIN DE PARTIE )TC 
2148 REM : RF 
2159 REM sssssssesessesessesses DYU 
2168 IF GAN=8 THEN 2288 QE 
2179 FOR H=1 TO 15 )LJ 
2188 CALL &ASBD,FN PO(X, Y),SP(19):FOR t:1 TO 38:NEXT t WA 
2198 CALL &ABSD,FN PO(CX, Y), SP(9) :SOUND 1,h#58,14,5:F0R DV 
T=1 TO 38:NEXT T,H 

2299 FOR H=1 TO 16:BORDER H:SOUND 1,H#15,18,14:FOR T:1 )DP 
TO 288 

2219 NEXT T,H:BORDER B:ENV 19,15,-1,1 )DE 
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2229 RT=TP:FOR H=1 TO RT:GOSUB 267#:SC=SC+25:GOSUB 2468 >AA 342 


2238 SOUND 1,8,15,15,19,,15:NEXT:SC=SC+188:G0SUB 2468  )XG 
2248 1F SCDREC THEN REC=SC:GOSUB 2538 )EC 
2258 TA=TA+1:GOSUB 2699:CALL &ASBD,FN po(28,6)-89,sp(4) )YK 


2268 CALL &A99D,FN po(28,6)+88, sp(4) :GOTO 549 )LF 
2278 REM ::: PERDU ::: >PB 
2288 CALL &AB9D,FN PO(X,Y),SP(18):FOR T=1 TO 288:NEXT WA 
2298 CALL &ABBD,FN PO(X,Y),SP(11):FOR T=1 TO 288:NEXT WP 
2388 BORDER 26:1INK 8,26: SOUND 4,1569,58,7,8,8,19 )PF 
2318 FOR t=1 TO 2988:NEXT E:BORDER 8:INK 8,8 XXT 
2328 SOUND 4,1298,8,8,14, 14: SOUND 4,8,28,2, ,,18 )HD 


2338 FOR h=1889 TO 1589 STEP 189:SOUND 4,h,38,8,15,15:N DAD 
EXT 

2348 FOR H=1 TO 28:PLOT 256,344,1:DRAN 389, 344:PLOT 256 DTU 
,342:DRAN 388, 342 

2359 FOR T=1 TO 5S:NEXT T:PLOT 256,344,8:DRAN 389,344:P LH 
LOT 256, 342 

2368 DRAW 388,342:FOR T=1 TO 58:NEXT T,H )FD 
2379 FOR h=1 TO 2BB8:NEXT :vie=vie-{:MUN=MUN+16:GOSUB 2 >DD 
698 

2388 1F vie=f THEN TA=9:SC-9:VIE=5:GOSUB 2468:G0T0 2258 >2Q 


2398 TA=TA-1:G0T0 2258 )QR 
2499 REM ssssstsseseneseeseseee )YR 
2418 REN : : )RF 
2428 REM : GESTION COMPTEURS : DYE 
2438 REM : ; )RH 
244 REM sssssrseseseeseseesees )N 
2458 REM ::: SCORE ::: )PX 
2468 A$=STRS(SC) :A$=RIGHTS(A$, LEN(A$)-1) )HQ 
2479 IF SC=8 THEN A$="99980":2L-9:YL=3:CER=1:GOSUB 468: DHE 
RETURN 

2488 IF SC)999 THEN ZL=18:YL=3:CER=1:G0SUB 469:RETURN  )2J 
2499 IF SC)99 THEN ZL=11:YL=3:CER=1:GOSUB 468:RETURN  )YD 
2598 IF SC)9 THEN ZL=12:YL=3:CER=1:GO0SUB 468:RETURN >XP 
2518 ZL=13:YL=3:CER=1:GO0SUB 469 :RETURN DHY 
2528 REM ::: RECORD ::: )QH 
2539 A$=STRS (REC) :A$=RIGHTS (AS, LEN(A$)-1) )JY 


2548 IF REC=8 THEN A$="98980":2L:26:YL:3:CER=9:GOSUB 46 DLG 
S:RETURN 
2558 IF REC>999 THEN ZL=27:YL:3:CER=9:GOSUB 46B:RETURN AK 


2569 IF REC>99 THEN ZL-28:YL:3:CER=9:GOSUB 46B:RETURN  >2D 


2578 IF REC)9 THEN ZL:29:YL=3:CER:9:GO0SUB 468:RETURN DYY 
2588 2L=34:YL=3:CER=1:GOSUB 468:RETURN HE 
2598 REM ::: MUNITIONS ::: )UD 
2698 PLOT 256,376,6:DRAW 389,376:PLOT 256,374:DRAU 388, BK 
374 

2618 PLOT 256,376, 3:DRAW 388,376:PLOT 256,374:DRAN 388, DLU 
374 :RETURN 

2628 IF MUN<16 THEN POKE &DB78+MUN, 8:POKE &EB7B+MUN, 8:R )GV 
ETURN 

2638 RETURN DFE 
2649 REM ::: TEMPS ::: >PH 
2658 PLOT 256,344, 1:DRAN 388,344:PLOT 256,342:DRAW 389, >BN 
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2668 PLOT 256,344,2:DRAN 388,344:PLOT 256,342:DRA 389, DLB 
342:RETURN 

2678 TP=TP-{:1F TPC1 THEN POKE &A933,1 DEN 
2688 POKE &D918+TP,9:POKE &E119+TP,D:RETURN HD 
2698 FOR H=34 TO 686 STEP 8:PLOT H,16,8:DRAW H, 392:PLOT )ZV 
638-H, 16:DRAW 638-H,382:NEXT :RETURN 

2708 a$="NIVEAU :"#+STR$(TA)+" CCC VIE :"4#STR$(VIE):2L= DKL 
8:YL=14:GOSUB 468:RETURN 


2719 REM srsssresenesenentences )Y4 
2728 REM : >RK 
2738 REM : DATA TABLEAUX )UJ 
2749 REM : ; TB 
2759 REM srsssseseseneneseesese )YA 
2769 REM ::: TAB 1 ::: )NQ 
277 DATA 1,12,14,8,3,2,6,5,2,6,16,5,18,19,18,2,1,19 DRR 
2789 REM ::: TAB 2 ::: NU 
2798 DATA 4,4,9,4,14,17,4,7,11,9,16,19,8 )EB 
2889 DATA 3,5,7,7,18,18,11,3,9,13,15,2,6,18 DHE 
2818 REM ::: TAB 3 ::: >NN 


2828 DATA 7,7,18,3,4,7,6,6,18,9,14,14,3,14,14,7,16,17,3 DEZ 
,16,17,7 

2838 DATA 5,3,6,4,2,2,11,5,9,19,3,7,13,7,19,17,18,2,7,1 DND 
7 

2848 REH ::: TAB 4 ::: NT 
2858 DATA 1,11,11,19,6,2,4,5,8,19,5,2,3,11,6,8,11,2,4,1 DFZ 
5,8,19,15 


2868 DATA 29,2,19,15 >MV 
2879 REM ::: TAB 5 ::: NX 
2888 DATA 1,19,11,5,2,6,7,18,6,7,11,38,2,15,15 >KV 
2898 REM ::: TAB 6 ::: )NA 


2998 DATA 5,5,7,5,5,7,8,7,19,3,13,15,4,12,15,7,19,2,5,4 DMT 
,8,18,4,4,9,18 

2918 DATA 2,3,13,7,9,15,2,2,17,4,4,17,6,6,17,8,8,17,19, )BM 
19,17 

2928 DATA 19,1,3,12 )LY 
2939 REM ::: TAB 7 ::: )Nÿ 
2948 DATA 7,5,5,3,7,9,3,13, 13,3,15,15,3,5,5,9,7,8,9,13, DAR 
14,9 

2958 DATA 8,3,6,4,8,9,4,3,4,9,6,9,9,3,6,12,8,9, 12,3, 4,1 DEX 
6,6,9,16 

2968 DATA 15,2,7,16 DMJ 
2978 REM ::: TAB 8 ::: )NB 
2988 DATA 3,9,18,4,12,13,4,15,16,4,9,2,3,4,5,6,4,8,9,4, )CU 
4,19,7 


2999 DATA 7,18,19,5,7,13,2,3,16,6,7,16,9,9, 16 >KX 
3888 DATA 28,2,18,16 >MG 
3819 REM ::: TAB 9 ::: >NA 


3829 DATA 3,4,7,4,5,5,6,15,16,4,4,4,8,4,4,8,19,4,8,14,5 )BF 
, 8,17 


3838 DATA 39,1,19,25 >MK 


5 MEMORY &7FFF:NODE 1 
7 LOCATE 1, 18:PRINT * DATAS DE LA LIGNE 
18 A:L80BG:F-LO2AB:L=18D:NHILE A:F:FOR A=A TO AMIS2READ C#:K=V 


CORRECTS":PEN 2 


26 





AL("&"+C$) :S=S+K+655364(5+K)32767): IF A<=F THEN POKE A,K 
28 NEXT:READ D$:T=VAL("&"+D$):1F TOS THEN PRINT CHR$(7);"Erreu 
r ligne";L:END ELSE L=L+5 

25 LOCATE 28,18:PRINT L-5:WEND 

189 DATA 96, 89,89, 89,89, 09, 09, 09, 09, 06,08, 80,06, 08,98, 99, 5699 
195 DATA 89,09,08, 99,00, 09,00,08,89,08,3F, 00,60, 09, 89,09, 003F 
118 DATA 98, 80,89,980,89, 00,99, 89,06,3F,99, 09, 95,08, 908,08, 987E 
115 DATA 88,99,99,09,98, 00,08, 06, 86,08, 98,89, 80,00,80,98,607E 
129 DATA 89,99, 89,99,99,69,09,06,09,08,FF, 88,08,08,98,09,D17D 
125 DATA 98,09,99,99,98,89,08, 08,58, 00,98,89,90,15,15,2A,91D1 
139 DATA 99,90,99, 89,99, 00, 69, 09, 09,00, 99,98, 15, 2A, 2A, 98,923 
135 DATA 96,99,08,09,99,08,06,09,99,08, 89,00, 90,00, 00,089,023A 
149 DATA 99,FF,99,80,80,00,09, 90,00, 00,09, 80,98,08,3F, AA, 8422 
145 DATA 986,09,99,60,98, 00,06, 08,60,00,06, 00, 80,09,60,98,9422 
159 DATA 98,15,99,3F, 06, 09,09, 09,09,00,08,08,95,98,98,98,9476 
155 DATA 3F, 99,24, 00,68,09,98,09,96,08,99, 80,89, 00, 80,98, G4DF 
168 DATA 89,89,89,89,55,3F, 99, 99,09,00,08,69,99,09,98,09,9573 
165 DATA 88,15,3F, AA, 98,09, 08, 08,96, 00,96, 00,50,09,00,08,8671 
178 DATA 88, 80,99,99,00, 09,09, 7F,2A,08,98,00,98,08,08,98,971À 
175 DATA 08, 09,96, 15,BF, 99,08, 08, 95,00,906,89,60,09,89,89,07EE 
168 DATA 99,89,99,99,00,09,99,99,55,3F,2A, 68,98, 99,98,69, BBAC 
185 DATA 98,09,08,09,98,15,3F,7F,90,08,96,80,88,89,89,09,897F 
199 DATA 89,98, 80,60, 00,09, 99,06,09,09,08,7F,BF,98,98,08, SABD 
195 DATA 86,09,86,00,98,09,08,7F,BF,90, 98, 00,60, 09, 60,99, 6BFB 
289 DATA 68,90,90, 88, 09,69,09, 09,99, 99,08,98,BF,3F,2A,98,9D23 
285 DATA 99, 69,08,60,99,99,06,08,86,3F,3F,7F, 88,99, 00,88, 6E29 
219 DATA 55,89,89, 86,69, 09,09, 00, 09,00, 09, 08,98,08,98, 15, 9E8A 
215 DATA FF,2A,98,69,08,09,09,00,96,08,15,FF, 2,89, 90,09, 19F1 
229 DATA 98,90,99,89,89,60,09,09,99,08,98, AA, 08, 08,98, 68, 119B 
225 DATA BF,3F,3F,90,98,09,06,08,06,08,90,98,7F,BF,3F, 7F,14D4 
239 DATA 98,89,89,80,7F,FF,09, 00,09, 00,09, 00,98,98,98, 08, 1652 
235 DATA 89,90,98,15,FF,2A,08,08,06,98,90,08,60,90,15,FF,1BA4 
249 DATA 24, 89,89, 89,89, 90,09, 09, 09,08, 09,00,08,08,FF,BF, LAGC 
245 DATA 99, 00,98,99,BF,3F,7F,BF, 99, 86, 89,00,99, 99, 89, 15, 1CDD 
259 DATA 3F,7F,FC,3F,899,89,09,15,BF,FF,FF, 09, 08,98,98,99,21A8 
255 DATA 99,69,98,69,08,09,08,08,7F,BF, 86,90, 80,00, 90,04, 22E6 
269 DATA 98,88,7F,BF, 89,99, 09,00, 99,00,98,60,05,08,98,99,2424 
265 DATA 99,FF,FF,7F,2A,89,00,08,3F,FC,BF,3F, 2A, 89, 09,98, 292E 
279 DATA 88,86,89,15,3F,3F,FE, BD, 99,09,98,55, 7F,3F,7F, 2A, 2038 
275 DATA 88, AA,98,90,08,00,99,08,95,3F,3F,3F,3F,7F,FF,FF,315B 
289 DATA FF,FF,FF,FF,FF,FF,BF,3F,3F,3F,93F, #9, 98, 98,98, 98,391 
285 DATA 89,99,55,99, 15,BF,3F,BF, AA, 99,86, 99,7E, FD, 3F,3F, 3DDA 
298 DATA 2A, 89,86, 89,99, 99,09,BF,3F,7F,7F,FC,08,08,98,15,4111 
295 DATA BF,3F,FF,FF,55,FF,99,98, 89,08, 89, 00,99, 7E, 89,98, 45DF 
389 DATA 68,86,89, 89,00, 09,06,00, 06,69, 09,09, 08,08, BD, 98, 469C 
385 DATA 99,69,98,90,08,09,FF,AA,FF,FF,3F,7F, 2A, 89, 09,98, 4B2B 
319 DATA FC,BF,BF,3F,7F, 09,08, 00,09,15,FE, FD, 3F,3F,BF,FE,52AE 
315 DATA 99, 09,98,7F,3F,3F,3F,FF,FF,3F,FF, 09, 89, 09, 89,08 ,5726 
329 DATA 89, 7E, 88, 89,89, 80,09, 00,09, 08,09, 90,99,00,98,98,57A4 
325 DATA 99, 99,BD, 99,98,09,88,98,88,FF,3F,FF,FF,9F,3F,3F,5C5A 
338 DATA BF,89,80,80,FD,7F,3F,3F,FE, FD, 2A,098,98,3F,7F,FF,62F5 
335 DATA 3F,3F,7F, 7E,88,99,88,BF,BF,3F,3F,3F,BF,3F,BF,FF, 6967 
349 DATA AA, 89,90, 86,69, 7E, 09, 00,09, 06, 00, 05,08, 08,98,98,6A8F 
345 DATA 99, 96,98, 09,89, 99, BD, 98, 89,88,88,55,FF, 7F,3F,7F, 6DDD 
358 DATA 3F,3F,3F,7F,7F, 68,88, 99, BD, BF, 3F,3F,FF,BF,3F, 98, 738F 
355 DATA 88,3F,3F,FE,BF,3F,3F,FF,98, 98, 88, FD, 3F, 7E, BD, 3F, 79FD 
369 DATA 3F,3F,3F, 3F,7F, 96,09, 99,06, 7E, 08, 08,96, 08,68, 98, 7BF6 
365 DATA 88,09,98,90,08,09,99,08,90, 08, BD, 98, 89,99, 89,BF, 7D72 


378 DATA 3F,3F,9F,3F,3F,7E, BD, 3F,FE, 99,09,98,FF,3F,3F, 7F,8321 l 


27 





? 375 DATA FD,3F,3F, 80,98, 39,35, 7F,FD,3F, 7F,3F,89,2A,54,FC, 88F4 


388 DATA FC,FC,FC,FC,3F,FC, FC, 3F,3F,FE, 99, 69,98, 7E,90,99,9115 
385 DATA 98, 89,99,99,06,09,95,00,66,08,90,99,96,99,BD,99,91D2 
399 DATA 98,89,FD, 3F,3F,FC,FC,3F,FC,FC,FC, FC, FC, A8, 15, 68, 9B2D 
395 DATA 3F,BF,3F,FE, BF, 34,39, 08, 19, 38, 39,35, 7F, 9F,3F,7F, AGB2 
489 DATA BF,3F,FC,FC,FC,FC,FC,FC,FC,FC,FC, FC, FC, 3F,FC, 98, ADBF 
485 DATA 98, 7E,09,09,00,09,09,09,06,99,99, 99, 69,99, 09,94, AE3D 
418 DATA 98,89, BD, 89,99,FC,3F,FC,FC,FC,FC,FC,FC,FC,FC,FC,B911 
415 DATA FC, FC,3F,7F,BF,3F,3F,BF, 34,98, 35, 29, 19,39, 35,39, BF1D 
428 DATA 7E,BF,3F,3F,9F,3F, BD, 3F,3F,3F,3F,3F,FF,FF,FF,FF,C74AÀ 
425 DATA FF,FF,FE, A8,98,3F,7F,FF,FF,FF,FF,FF,FF,FF,FF,FF, D4A3 
439 DATA FF,FF,FF,FF,FF,BF,3F,89,54,FD,FF,FF,FF,FF,FF,FF,E1E7 


| 435 DATA 3F,3F,9F,3F,3F, 7E,3F,3F,3F,3F, 7F, BD, 69, 39, 39, 29, E6B8 
| 449 DATA 19,99, 39, 39,35,FF,3F,3F, 3F,3F,BD, 59, 99,09,98, 9, EAAS 


445 DATA 89, 09,98, 89,98, 90, 7E, 8,98,54,7E, FC, FC, BF,FE, FC, F14E 
458 DATA FC, BD, 7E, FC, FC, FD, 7F, FC, FC, BD, 48, 98,54, BD, 98, 85, FB67 
455 DATA 96, 08,08,00,98,00,89,09,99,7E,3F,3F,3F,3F,FF, 34, FELA 
468 DATA 68,36, 39, 29, 30,99, 39, 38, 35, FD, 3F, 3F, 9F, 3F, BD, 09, 8305 
465 DATA 99,99, 08,08,89, 89,95, 08, 46,08, 7€, 7E, 54, BD, FE, FC, 8760 
478 DATA F0, ?F,3F, 7E, FC, FC, FC, FC, BD, 3F, BF, FE, FC, FD, 7E, AB, 1300 
475 DATA BD, 80,98, 68,98, 69,98, 68,96,09,89,90, 80, 7E, 9F, 3F, 1583 
488 DATA 3F,3F, FE, 34, 30, 39, 39, 39, 36,36, 38, 38,38, 7E, FF, 9F, LAAS 
485 DATA 3F,9F, BD, 69,96, 99,98, 08,99, 09,99, 90,80, 90, 7E, 3F, 1COD 
499 DATA F0, ?F,2F, FC, FC, BF, BF, 3F, FC, BD, TE, FC, 8F, 7F, 7F, FC, 2789 
495 DATA FC, BF, BF, FE, 3F,BD,98,98,98,09, 89,00, 89,99, 0,99, 2C2D 
598 DATA 86, 7E, 3F, 3F, 3F, FF, BD, 39, 39, 9, 38, 38, 38, 38, 38, 39, 30D4 
585 DATA 39, 7E, FD, 3F, BF, 3F, BD, 68,98, 98,99, 60,90, 09, 99,99, 3479 
518 DATA 89,88, 7E,3F,BF,BF,BF,FE, FC, 55, 9F, 2A, 98, 3F, 9F, 09, 3AA9 
515 DATA 15, 3F, AA, FC, FD, 7F, 75, 7F,3F, BD, 99,99, 89,99, 89,98, 4919 
528 DATA 86,88, 80, 89,99, 76, 9F, 7F,9F,FE, BD, 38, 38, 38,38, 38, 449F 
525 DATA 38,38, 38, 38,38, 7E,FC, FF, 7F, 7F, BD, 69, 60,40, 89,98, 4963 
538 DATA 99,89, 80, 89,90, 88, 7E, 7F, 7F, 7F,9F,9F, A8, 08, 3F, 08, 4CC3 
535 DATA 89,3F, 9F, 09,98, 3F,98, 54, 9F,9F, BF, BF, BF, BD, 89,98, 514C 
549 DATA 89,89,80, 09,09, 99,09, 09,08, 7E, BF, BF, FF, FC, BD, 39, 5638 
545 DATA 36, 39,39, 38, 38, 38, 38, 98,38, 75, FC, BF,BF,BF, BD, 49, 5C4B 
559 DATA 89,89,80, 89,99, 99, 99, 99, 09,09, 76, 5F,BF,FE, BD, 9F,5FC1 
555 DATA 24, 99,98, 69,99, 99,09, 09,66,09,98, 15, 9F, 7E, FD, 7F, 6239 
569 DATA 3F, BD, 89, 89, 89, 99, 09, 09,09, 09,09, 06,08, 7E, 7F,7F,64B1 
565 DATA 7F, FC, BA, 38, 38, 38, 38, 38, 38, 39, 39, 30, 39,35, FC, FC, GAF3 
578 DATA ?F,7F,FD,49,80,00,09,00,09,08,09,00,09,08, 7E, 7F,GDEB 
575 DATA 7F,48,98,15,9F,98,98,09,99,3F,3F,80, 80,9, 60, F, 7023 
586 DATA 24,88,54,BF,BF, BD, 99, 09,0, 06,09,89,99,09,99, 98, 72DC 
585 DATA 98,FE, BF, BF, FC, FC, 34, 39,38, 39,36, 39, 39, 39, 39, 39, 7934 
599 DATA 38,35, FC, FC, FC, BF, FD, 09,09, 06,09,09,99,09,89, 9, 7E4F 
595 DATA 99,89, 7E,3F,FE, 09,08, 09,3F, 24,89, 09,15,3F,3F, 2A, 8138 
688 DATA 99,89,15,3F,99, 89, 89,FD,3F, BD, 0, 08,08, 08,08, 00,837D 
695 DATA 98,99,99,08,98,FE, 7F,FC, FC, FC, 38, 39, 39, 39, 39, 38, 8918 
618 DATA 38,36, 38, 78, 39,35, 48,54, FC, FD, FD,FF,FF,FF,FF,FF, 9364 
615 DATA FF,FF,FF,FF,FF,FF,FE, 9F,A6,9F,3F,3F,3F,9F, 3F, 7F, 9D42 
628 DATA FF,FF,FF,FF, BF, 9F,3F,9F,3F,3F,3F,54,9F, FD, FF, FF, A795 
625 DATA FF,FF,FF,FF,FF,FF,FF,FF,FF,FE,FE, FC, AB, 54, 94, 39, B45A 
638 DATA B8,36, 38, 38, 39, 38,39, F1,B9, 35,48, 88,54, FC, FC, FC, BBFS 


“635 DATA FC,FC,FC,FC,FC,FC,FC, FC, FC, FC, FC, 3F, AB, 7E, 89,99, C829 


649 DATA 88,69,90, 89,99, 69,09, 08, 09,05, 09,68,99,DB,BD,54,C93A 
645 DATA 3F,FC,FC,FC,FC,FC,FC, FC, FC, FC, FC, FC, FC, FC, FC, A8, D7E9 
659 DATA 88,54,34, 79,F2, 39,39, 38, 19,38, 79,F2,F8, 35, A8, 55, DDD8 
655 DATA 98,54,99,99,98,08,08,00,96,09, 99,09, BD, 3F,3F, 7F, DFEG 
668 DATA AB,7E, 89,89, 80, 98,99, 06,99,00,09, 90, 05,08,08,98,E19C 
665 DATA 98,99,BD,54,BF,3F,9F, 7E,99,09,88, 80,59, 99, 69,99, E3D8 





679 DATA 59,88, A6,99,99,54, 3A,F5,F1,B5, 39, 28, 18,38, 71,F1,E991 ? 


675 DATA F,35, A6, 69,98, 90,99,00,08,08,96,00, 60,80, 99,09,EBSE 
688 DATA 54,BF,3F,FE, 99, 7E, 99, 09, 09,05, 09, 99,08,09,98,99,EE2C 
685 DATA 98,90,08,99,98,99,BD, 98,FD, 3F, 7F, A8, 96,99,89,08,F14C 
698 DATA 58,89,80,89,09,89,08,06,99,54,3A,F8,F2,B2,38,29,FÔBE 
695 DATA 99,39, 78,F2,F8,35, A8, 98,88,09,90,09, 60,99, 89,99,F81D 
789 DATA 99,90,99,99,89,FD,FF, A8,99,7E,99,06,09,99,08,08,FB3F 
785 DATA 99,66,08,00,99,99,88,08,99,99,BD,89,54,FF,FE,08,FE4D 
719 DATA 99,99,80,89,09,069,99,99,06,00,99,69,99,54,3A,F8,FFCB 
715 DATA F1,B9,38,90,08,38,38,F8,FS,35,96,09,89,09,60,08,8411 
729 DATA 99,96,89,09, 99,06, 09,00,89,54,FC, 69,98,7E, 98,99, 55DF 
725 DATA 99,90,96, 09,95, 09,96, 08,96, 08,89, 99, 89,99, BD, 99, 269€ 
738 DATA 69,FC, AB, 89,90, 90,09,06,06,09,09,05,09,08,08,09, 5849 
735 DATA 99,98, 3A,F9,FS,38,38,09,96, 19,38, 79,B9,FF, 89,89, 8D19 
748 DATA 99,99,90,09,99,96,09,09,06,69,09,09,99,08,08,99,8D19 
745 DATA 99, 7E,98,00,09,00,88,08,99,09,96,89,80,99, 69,08, 8D97 
758 DATA 98,99,BD, 89,99, 69, 89,09,09,09,09,90,99,08,98,08,8E54 
755 DATA 99,89,98,90,99,89,FF, 78,B9,39, 29,99, 89,99, 19,38, 1193 
768 DATA 88, 24,89, 96, 89,66, 09, 06, 99,05, 09,95,08,05,08,08, 112) 
765 DATA 98,09,08,90,68,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF, 1022 
779 DATA FF,FF,FF,FF,FF,FF,FF,09,09,08,09,99,09,98,98,99,231B 
775 DATA 08,99,99,09,98,69,99,00,96,09, 15,99, 39,29, 80,09, 2389 
788 DATA 88,89,80,00,89,96,09,06,99,99,09,69,98,09,98, 95, 2388 
765 DATA 99,89,99,90,69,00,09, 09,98, 09,99,90,60,89, 69,55, 23D5 
799 DATA 3F,3F,3F,3F, AA, 99, 09, 69, 09,95, 09,09,09,09,99,08,257B 
795 DATA 99,06,89, 60,08, 00,05,08,09,90,89,90, 60,09, 09,99, 257B 
889 DATA 99,89,90, 89,89, 89, 09,09, 06,05,09,08,98,08,98,08,257B 
895 DATA 99, 99,08,06,99,80,986,09,99, 08,96, 99, 00,89, 99,99,257B 
818 DATA 99,89,80,BF,3F,3F,3F,3F, 7F,80,98,08,09,08,99,98,27B5 
815 DATA 99,99,08,09,99,60,09,09,99,99,99,09,89,00, 00,09, 2785 
829 DATA 68,89,99,99,09,89,99,06,09,09,99,69,09,98,08,58,27B5 
825 DATA 96,66,06,09,99,00,09,08,99,06,80,09, 80,89, 90,99, 27B5 
838 DATA 89,89,99,89, 99,89, 69,BF,3F,3F,3F,3F, 7F, 90,98, 08, 29EF 
835 DATA 99, 99,08, 00,08,900,08, 99,68, 00,69, 99, 60,99, 69,08, 29FF 
848 DATA ‘99,86,09, 89, 90,60, 09,09, 60,05,98,60,65,08,98,98,29EF 
845 DATA 88, 09,09,69,99,00,98,00,68,90,96,69,90,89, 99,99, 29EF 
858 DATA 98, 89,99,99,80,69,69,99,09,95,99,55,3F,3F,3F,3F,2B4f 
855 DATA AA, 89,99, 69,08,09,06,98,99,99,99,99, 60,99, 99,98, 2BEA 
868 DATA 99, 89,09, 99,99, 69,09, 99, 69,05,99,69,98,98,98,98,2BEA 
865 DATA 99, 99,96,09,88,00,06,09,68,09,90,96,80,09, 60,98, 2BEA 
878 DATA 96,80,89, 80,99, 00,00, 06, 00,08,99,68,99,90,98,55,2C3F 
875 DATA 3F,3F,3F, 7F,2A, 69,96, 09,99,60,99,99,80,99, 60,09, 2DA5 
888 DATA 99,99, 96,89, 89, 69,09, 06, 00,06,09,08,09,98,08,68,2DAS 
885 DATA 99,90,98,66,08,969,08,99,08,09,99,90, 60,09, 80,98,2DA5 
898 DATA 59,99, 80,88,00,00,09,99,09,06,09,06,08,08,08,99, 2DA5 
895 DATA 99,90,06,98,3F,3F,3F,BF, 08,09, 89,09, 60,99, 80,09, 2F21 
988 DATA 99,96,89,89,89,06,09,09,09,06,09,00,99,99,99,99,2F21 
995 DATA 96,99,00,00,96,09,08,08,969,99,96,09,89,09,969,98,2F21 
919 DATA 66,89,89,80,60,09,09,09,09,66,00,09,98,98,98,08,2F21 
915 DATA 99,68,08,09,98,00,98,08,15,3F,3F, 2A, 80,89, 89,09, 2FDE 
929 DATA 59,96, 69, 89,00, 99,99,09,09,06,66,90,99,09,08, 08, 2FDE 
925 DATA 99,66,98,00,99,09,98,08,08,99,99,90, 90,08, 89,09, 2FDE 
938 DATA 99,99,89, 99,89, 09,09, 60,09,09,09,69,96,08,09,08, 2FDE 
935 DATA 99,99,98,99,08,09,99,09,98,09,68,89,99,3F, 3F,08,385C 
948 DATA 99,80,99,96,99,69,09, 06, 00,09,09,09,98,08,90, 99, 385C 
945 DATA 99,99,96,66,08,99,09,99,66,00,90,09, 99,09, 99,98, 395C 
958 DATA 33, 4C,CC, CC, 33,66, CC, CC, 33, 26, CC, CC, 33,26, CC, CC, 3886 
955 DATA 33,26, 4C,CC, 33,26, 4C,CC, 33,26, 84, CC, 33,26, 84, 8C, 3DFA 
969 DATA 33,26,C9,84,33,26, C9, 84, 33,26, C8, 84, 33,26,C8, 84, 446E 





| 


965 DATA 33,26,C8,64,33,26,C8,64, 33, 26, C8, 84, 33, 26, C9, 84, 4AE2 

97$ DATA CC, CC, 80, 33, CC, CC, 99, 33, CC, CC, 19, 33, CC, CC, 19, 33, 5365 

975 DATA CC, 80, 19,33,CC, 8C, 19, 33, CC, 48, 19, 33, fC, 48, 19, 33, 5BAD 

988 DATA 48,08, 19,33, 48, C8, 19, 33, 48, CS, 19, 33, 48, CB, 19, 33, 5DFD 

985 DATA 48, C8, 19, 33,48, C8, 19, 33,48, C8, 19, 33, 48, CS, 19, 33, 634D 

998 DATA 33,26,C8,84,33,26,C9, 84, 33, 26, C8, 84,33, 26,C8,84,69C1 

995 DATA 33,26,C8,84,33,26,C8,84,8C,8C, C8, 64, 33, 26, C9, 84, 6FF4 

1995 DATA 33,26, 48, 84,33, 26, 84,84, 33, 26,C8, 80, 33, 26, CS, 84, 753C 
1985 DATA 33,26,C89, 84, 33,26, C9, 84, 33,26, C5, 84, 33,26, C8, 84, 7BBS 
1819 DATA 48,09, 19,33, 48,C8, 19,33,48,C8, 19, 33,48, C8, 19, 33, 8188 
1915 DATA 48,C8,19,33,48,C8, 19,33, 48,C8, 8C, 4C, 48, C8, 19,33, 861C 
1829 DATA 48,84, 19,33, 48, 48, 19,33,9C, C8, 19, 33, 48, C9, 19, 33, BA7C 
1925 DATA 48,C8,19,33,48, C6, 19, 33, 48, C9, 19,33, 48, C9, 19, 33, BFCC 
1835 DATA CC,CC,BC,CC,CC, CC, 8C, CC, CC, CC, 8C, CC, CC, CC, 8C, CC, gB8C 
1935 DATA CC,CC,8C,CC,CC, CC, BC, CC, CC, CC, BC, CC, C, BC, BC, 4C, A48C 
1849 DATA 8C,8C,8C,8C, 33,26, 33,33, 33, 26, 33, 33, 33, 26, 33, 33, AGF9 
1945 DATA 33,26, 33,33, 33,26, 33, 33, 33,26, 33, 33, 33, 26, 33, 33, A9F5 
1859 DATA 48,C9,91,33,48,C8,C8,33, 4D,CF,CA,91, 4D,9B,CF,91,B27B 
1855 DATA 48,C5,CF,CA, 4D,CF,9B, CA, 4D,CF,C5, CA, 48,C8,CF, CA, BCEE 
1868 DATA 4D,CF,9B,CA, 4D,CF,67,C8,48,C8,CA, C1, 4D, CF, CA, 91, C6BC 
1865 DATA 4D,CF,C#,93,48,C8, C1, 33, 48, C8, 93, 33, 49, C3, 33,33, CE67 
1978 DATA 33,33,33, 22, 33, 33, 33,88, 26, 8C, 8C, 88, 26, 8C, 8C, 88, D1CF 
1875 DATA 66,CC,CC,88,CC, CC, CC, 88, 89,99, 99,08, 11,33, 11,33, D7C9 
1985 DATA 11,66,11,66,11,4C,11,4C,11,4C,11,4C,11,4C,11,4C,DAES 
1985 DATA 11,4C,11,40C,11,4C,11,4C,11,CC, 11,CC, 44, CC, 44, CC, E833 
1898 DATA 3F,3F,3F,3F,3F,3F,3F,7E,3F,BF,95,FE, 7F,6A,7F,FE,E761 
1995 DATA 3F,95,FF,FE, GA, 7F,FF,FE,3F,FF,FF,7E, 7F,FF,BF,D4,F2E4 
1198 DATA 7F,FF,G6A,7E, 7F,BF,95,FE, 7F,6A, 7F, 7E,3F,95,BF,FE, FC92 
1185 DATA 6A,7F,7F,7C,3F,BF,BE, 7C, 7E, FC, FC,FC, FC, FC, FC, FC, 9818 
1118 DATA 69,96, 09,09,00,08,08,09,08, 08,69, 08,99, 89,99, 88, 8619 
1115 DATA 88,99,99,99,89,09, 89,09, 89,09,99,08,09,08,08,98,0819 
1129 DATA 89,09,06,55,09,69,95,08,08,08,08,99, 99, 80,89,09,0818 
1125 DATA 88,08,98,09,90,00, 00,00, 09,08,00,08,80,08,00,49, 0818 
1138 DATA 99,286, 09,98, 28, 14,99, 3D,98, 7F,28,3E, 15, 3F, 26, 28, BASA 
1135 DATA 3C,C8,BE, 99, 3D,C8,3E, 28, 6A, 6A, 7F,28, 7D,3F,95, BF, 18E2 
1148 DATA 7D,BF,C8,3F,3C,6A,C8,3E, 14, C9,95, BE, 3D, 6A, DS, 28, 188C 
1145 DATA 14,6A,3E, 28, 14,9F,BE, 14, 14, 3D, 26, 99, 28, 3C, 98, 28, 1BOA 
1159 DATA 89,85,09,08, 14,08, AA, 69,98, EA, 14,88, 68, 88,99, 14,1E6A 
1155 DATA 55,49, 3D,49, 88,3, DS, 24, 14,D5, BE, 88, AA, 6A, C9, 88, 24B2 
1169 DATA 98,66,95,3E,94, DS, EA, 28, 98, BE, D5, 6A,55, 49, 3D, 89, 2837 
1165 DATA 28,98,96, 14,49,55,14,99,55,09, 89, 49,09,08,99,99,2D31 
1178 DATA 89,51, 2,88, 99, B3, 73,98, 98,3, 73, 28,51, 33,91, A2, 3227 
1175 DATA 51,62,91,A2,51,62,91, A2, 51,62, 91, A2,51,62,91, A2, 39BF 
1189 DATA 51,62,91, A2,B3,C8,91, 73,B3,C8,C8, 73,B3,C9,C8, 73, 4368 
1185 DATA B3,C8,C9, 73,B3, 62, 33, 73, B3,B3, B3, 73,51,51,51, A2, 4BEA 
1199 DATA 99,89,F3,98,99,51,33,A2,58,B3,C8, A2, 86, F2,C9, A2, 5260 
1195 DATA 98,B6,E8,F1, 99, E2, 68, 79,51,62,C9,D1,51,62,C9,D1,5B3E 
1288 DATA 51,62, 48,D1,51,C8,84,A2,B3,C8,C8, A2, B3, C8, CS, A2,64EB 
1285 DATA 51,62,91,A2,51,62,D1,89, 89,B3, 73,98, 99,51, A2,98,GAGE 
1219 DATA 99,51, A2, 98,99, B3, 73, 98,98, B3,73,88,51,62,91, A2,6F93 
1215 DATA 51,62,91,A2,51,68,94,A2,51,E8,D9, A2,51,62,91, A2,77F1 
1229 DATA 51,62,91, A2,B3,C8,C8, 73,B3,CA,C5, 73,B3, C5, CA, 73, B1E7 
1225 DATA B3,C9,C8,73,B3,C9, 62, 73, B3,B3,91, 73,51,51,51, A2, 8AD4 
1239 DATA 99,F3,98,98,51,33, A2, 58,51,C8,73,99,51,C9,F1,88,9873 
1235 DATA F2,D8, 79,58,B6,94,D1,98,E2,C#, 91, A2, E2, C8, 91, A2, SA73 
1249 DATA E2,84,91,A2,51,48,C8, A2,51,C8,C8, 73,51,C8,C8, 73, A38F 
1245 DATA 51,62,91,A2,88,E2,91, A2, 89,B3, 73,98, 99,51, A2,89, A9A3 
1258 DATA 89,C3,89,98,41,96,3C,3C,41,78,58,B8, 14, A8, 58, AS, AEG62 
1255 DATA B4,41,82,F9,B4,C3,C3, FA, B4,C3, 43, FA, B4,C3, 93, FA, B925 
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1268 DATA B4,C3,93,F9, 14,63, 43, AB, 14,C3,C3, 88,98, 3C, 28, 89, BF87 
1265 DATA 99,98,94,89, 45, 8C, 8C, BA, 84, 8E, 4D,98, 99,98, 94, 98, CBED 
1279 DATA 99,14,99,99,99,B4,F9,08,98,14,F8,A8,89,14,55,F8,C5A2 
1275 DATA 68,41,C3,FA,89,C3,C3, D2, 89, 43, C3,D2, 99,93, C3, 82, CD18 
1289 DATA 59,93, C3, 82,58, 63,83, 82, 14,C3,43,82,58,69, C3, 84, D3A4 
1285 DATA 58,BE, 3C, 4,59, F9, 45,8E, 59, AS, 8E,99, 89, AP, 8C, 98, D978 
1299 DATA 99,96, 14, 90,08,98,3C, 28,98, 58, BB, AA, 86, 14, BB, BE, DCE2 
1295 DATA 98,55,3B, 7F,99,55, 3B, 7F, 89, 14, BB, BE, 99, 14,BB,BE,E21À 
1388 DATA 99,99, 39, 28,99, 69,39, 28, 88, 88, 7D, 28,89, 89, 7D, 28,E426 
1385 DATA 98,98, FD, A8, 98,99, FD, A6, 89,98, 14,99,99,98,14,98,E798 
1319 DATA 99,96,99,28,08,99,F9, 28,98,58,F8,28,894,589,FA, AS, EC2E 
1315 DATA 4D,CB, 82, 28,8E, C3, 43,28, 8C, 83, 43,28, 94,83, C3, 28,F218 
1329 DATA 14,83,C3,28,84,C3,C3,69,8C, C3,C3, 69, 8E, 69, 82, 69, FO6A 
1325 DATA 4D,9E, A9,69,94,58,3C,E1, 89,58, F9, 28,09,98,B4,98,FEEB 
1338 DATA 99,6E, 98,98, 09, 4D, 96, 99, 8E, 8E, 98, 98, 4D, 49,D2, AS, 82FA 
1335 DATA #C,69,43,F8,1C,83, 43,F8, 14,683,C3, FA, B4,83,C3, FA, SBBC 
1349 DATA B4,C3,C3,58,B4,C3,C3,58,F5,69,82,F9,F5, 30, 3C, 3C, 1549 
1345 DATA F6,A6,98,50,F9,09, 99,09, 90,09, 69,98,09,05,00,99, 1819 
1359 DATA 99,99,06,08,09,68,08,68,08,69,96,08,99,89, 89,89, 1619 
1355 DATA 99,98, 14,89,90,89, 7D, 28, 89, 14,FF, AA, 14,3C, BF, BE, 1C5C 
1369 DATA 7D,BB, 33, 36, 14,3C,BF,BE, 98, 14,FF, AA, 88, 89, 7D, 28, 2220 
1365 DATA 99,69,14,99,99,09,99,99, 99,09, 09,99,09,09, 00,95, 2248 
1379 DATA 69,98,94,68,04,6E, 4D, 96, 45, 5C, SC, BA, 89, 56, 84,99, 2426 
1375 DATA 88,30C,28,98,14,C3,C3,99, 14,63, 43, A, B4,C3,93,FS, 2A08 
1389 DATA B4,C3,83,FA,B4,C3,43,FA,B4,C3,C3,FA,B4, 41, 82,F8, 34CB 
1385 DATA 14,A9,58,A8,41,78,56,99, 41,96, 3C,3C, 99,C3, 08,98, 398A 
1399 DATA 88,A6,0C,98,59, AB, 8E,98,58,F8,45,6E,58, BE, 30, 4D, 3F5E 
1395 DATA 58,69,C3,94, 14,C3, 43,82, 59,83, 83,82, 59,93,C3, 82, 45EA 
1499 DATA 99,93,C3, 82, 88, 43,C3,D2,98,C3,C3,D2, 88, 41, C3, FA, 4D68 
1495 DATA 88,14,55,F8,89,14,F6, A9, 89,B4,F9,88, 05, 14,98,98,5215 
1419 DATA 99,89, 28,95, 99,98,28,98,98,54,FE,98,99,54,FE, 89, 5599 
1415 DATA 88,14,BE, 99,99, 14,BE, 99, 89, 14, 36,99, 99, 14,36,99,5741 
1428 DATA 68, 7D, 77,28,98, 70, 77,28,08,BF,37, AA, 88, BF, 37, AA, 5CB9 
1425 DATA 98,70, 77,28,88,55, 77,89,96, 14,3C,98,89,09,26,98,5F19 
1438 DATA 14,09,09,99,14,F0,968,98,14,F8,AG,89,59,F5, A9, 8B,63C2 
1435 DATA 14,41,C7,8E, 14,83,C3, 4D, 14,83, 43,4C, 14,C3,43,98,691B 
1449 DATA 14,03, 43,28,96,C3,C3,98,96,C3,C3,8C, 96, 41,96, 40, 7963 
1445 DATA 96,59,6D,8E, D2,3C, A5, 98, 14, F9, 9,99, 99, 78,00,99, 7616 
1459 DATA 99,84, 4D,96,99,94,8E,99,98, 09, 4D, 4D,58, F1, 66, 8E, 79D8 
1455 DATA F8,83,96,8C,F,83, 43,2C,F5, C3, 43,28,F5,C3,43, 78,8265 
1468 DATA A9,C3,C3, 78, A8,C3,C3, 78,F8, 41,96, FA, 3C, 3C, 3C, FA, BC1ÿ 
1465 DATA A5,99,58,F9,99,09,99,F9, 96,09, 99,09, 09,96,08,98,8FES 
1478 DATA 99,09,09,08,09,09,98,06,09, 65,99, 00,99, 26,99, 99, BFBB 
1475 DATA 14,BE,98,689,55,FF, 28,98, 7D, 7F, 3C, 28, 39, 33, 77,BE, 9457 
1488 DATA 7D,7F,3C,28,55,FF,28,98, 14,BE, 98, 88, 99, 28, 89, 89, 982D 
1485 DATA 99,09,69,00,99,80,99,00, 99,08, 60,09, 95,09, 00, 99,982) 
1498 DATA 99,09, 09,09,99,90,98,98,91,52,98,08,93,C3, 88,89, 96F6 
1495 DATA 92,41,98,89, 82,81, 89,90, 43,93, 92,05, 01,92,93,96,9AGA 
1599 DATA 99,98, 81,82,99,08,63,03,58, 98,93, 63, 99, 89, 41,83, 9B5D 
1585 DATA 99,99,09,92,66,09, 80,09, 965,09, 60,09, 09,99,09,89,9B5F 
1519 DATA 3F,3F,FF,FF,2A,98,98,55,2A,28,94,55, 24, 28, 8E, 5D, A842 
1515 DATA 24,28, 80, 5D, 2A, 28, 4D, 1D, 2A, 28,94, 15, 2A,28,ED, 15,378 
1528 DATA 2A,28,ED, 15, 2A, 7C, 94, 15,3E, 28, 4D, 1D,2A, 28, 8C, 1D, A6D6 
1525 DATA SE, 28,8E, 1D,3E, 98, 84, 15,BE, 98,99, 15,FF,FF,3F,3F, ABBD 
1538 DATA 89,14,28,99,06,78,B4,96, 14,B4,3C,28, 14, B4, 3C, 28, AF4D 
1535 DATA 78,3C,3C, 30, 3, 30, 30, 30, 39, 33, 33,36, 39, 33, 33, 36, B313 
1549 DATA 39,33, 33,36, 30, 3C, 30, 3€, 30, 3C, 3€, 7C, 30, 3C, 3C, 7C, B738 
1545 DATA 14,30, 30, 28,54, 30, 30, A8, 95, BC, 7C, 89, 99,54, A6, 99, BB94 
1559 DATA 99,91,92,99,09, 83,93, 98,98,47,8B,99,91, BA, 45,92, BD41 





1555 DATA 47,49,89,8B,43,C8,C9,83,41,C#,89,82,41,C8,49,82,C4DF 
1568 DATA 41,99,C9,62,41,C8,C8, 82,41, 48,88, 82, 41, 88,89, 82, CAEB 
1565 DATA 41,99,99,82,41,99, 98,62, 44,CF,CF,88,CC,CD,CE, CC, D2E 
1578 DATA 89,06,99,99,69,99,98,98,98,91,67,99, 49,99, 22, 8A, D3F2 
1575 DATA 49,99,22,22,48,C6,33, 22, 49,99, 99, 8A, 99,91, 33,49, D759 
1588 DATA C9,99,99,67,91,98,98,CF,98,22, 11,89, 98, 49,98, 89, DAS3 
1585 DATA 88,69,11,99,C9,99,89,67,91,99, 89,67,99,09,09,98, DD93 
1599 DATA 89,06,09,09, 90,95, 98,68,08,08,99,08,69,99,56, 09, DDB3 
2989 CLS:PRINT " FICHIER LANGAGE MACHINE CORRECT..." 

2819 PRINT:PRINT:PRINT 

2828 PRINT "UNE TOUCHE POUR LA SAUVEGARDE..." 
2835 CALL &BB18 

2849 SAVE "GHOSPRIT",B, k8998, &12A8 





RUES 


DAAGI-BAS *| 


5 MEMORY K7FFF:HODE 1 
7 LOCATE 1,18:PRINT * DATAS DE LA LIGNE 


CORRECTS":PEN 2 
18 A=&9D29:F=&A298:L=189:WHILE A(=F:FOR A=A TO A+15:READ C$:K=V 
AL("&"+CS):S=S4K+65536#(S+K)32767):1F A<=F THEN POKE A,k 

28 NEXT:READ D$:T=VAL("&"+D$):[F TC>S THEN PRINT CHR$(7);"Erreu 
r ligne";L:END ELSE L=L+5 

25 LOCATE 28,18:PRINT L-5:WEND 

188 DATA DD,5E, 99, DD, 56, 91, DD, 6E, 92, DD, 66, 83, 96, 98,C5,E5, S6BA 
185 DATA 96,92, 1A,77,23,13,18,FA,E1,CD,26,BC, C1, 19, EF,C9, ZDAC 
118 DATA 48,C8,49,C8,11,11,11,11,94,94,94,94,44,CC,98,88,1118 
115 DATA 98,69,49,89,98, 22,89, 22,98,06, 80,96, 44, CC, 69,08, 13B4 
128 DATA 48,C9,49,48,89,11,89,11,09,98,684,98,44,CC,98,98, 1672 
125 DATA 48,C9,49,49,88,11,99,11,98,8C,89,84, 44,CC, 69,99, 1934 
138 DATA 99,49,568,C8, 89, 33,11,11,94,9C,99,04, 98, 44,99, D8, LAEL 
135 DATA 49,C9,48,09,11,99,08,33,89,04,64, 94, 44,CC, 9,99, 1D81 
148 DATA 49,C9,49,49, 11,99, 11,33,94,04,94,04,44,CC, 98,68, 2876 
145 DATA 48,C9,98, 49,08, 11,98, 22,89, 08,94,99, 44,89, 80,09, 2239 
158 DATA 49,C8,49,49,11,11,11,33,84,94,94,94,44,CC, 08,98, 253F 
155 DATA 48,C8,48,49,11,11,11,33,99, 94,89, 84, 44,CC, 89, 89, 283D 
168 DATA 99,89,90,96, 69,89, 09, 69,99, AA, 99,09, 99, 28,68, 98, 299F 
165 DATA 98,99,08,60,99,99,99, 09,96, AA, 99,69, 09,28, 14,98, 29F5 
178 DATA 66,89,89,99,80, 89,69, 00,98,98, 99, AA, 99,26,68,98,2AC7 
175 DATA 68,90,08,960,99, 99,08, 99,96,99,99, AA, 89, 28, 14,99, 2BAD 
188 DATA 99,69,89, 69,15, 89, 89, 99,09,96,99,98,99,08,99, DB, 2CC2 
185 DATA 98,80,49,48,15,15,98, 15,98, AA, 89, 89, 00, 26, 89,99, 2ED3 
198 DATA 58,69,99, 89,99, 2A, 99, 2A, 09, AA, 98,08, 99, 28,68, 98, 38F9 
195 DATA 48,C8,48,0C8,15,15,15,15,55,FF,55,55, 14, 14, 89,99, 3573 
289 DATA 48,C8,49,C8,15,15,15, 15,55, AA,55,55, 14, 3C, 68, 98, 39C8 
285 DATA 48,C9,48,C8,15,89,15,98,55,88,55, 89, 14, 3C, 69,08, 3CE4 
218 DATA 48,88,49,C6,15,15,15,15,55,55,55,55, 14, 3C, 98, 98, 489C 
215 DATA 48,C9,48,C8,15,99,15,98,55, AA,55, 99, 14, 3C, 89,99, 446A 
228 DATA 48,C8,48,C9,15, 89, 15,86,55, AA,55,98, 14, 90,99, 98, 47FC 
225 DATA 49,C9,48,08,15,15,15,98,55,89,55,55, 14,3C, 89,88, 4BBA 
239 DATA 49,49,49,49,15,15,15,15,55,FF,55,55, 14, 14,98, 98, 4F84 
235 DATA 49,C9,98, 89,88, 2A,98,2A,68, AA, 86, AA, 14,3C, 89,98,527C 
249 DATA 49,C9,68, 88,89, 2A, 89, 2A, 89, AA, 88, AA, 14, 26,98, 58, 55E8 
245 DATA 48,48,48,49,15,15,15,2A,55, AA, 55,55, 14, 14, 99,99, 5914 
258 DATA 49,89,49,86, 15,88, 15,99,55,98,55,98, 14,30, 98, 58, SABE 
255 DATA 49,49,48,C9,15,3F,15,15,55,55,55,55, 14, 14, 99,98, 5E38 
268 DATA 49,48,49,49,15,3F,15,3F,55,FF,55,55, 14, 14,08, 98,6286 


29 





265 DATA 48,C9,49,49,15,15,15,15,55,55,55,55, 14, 3C, 89,99, 657E 
278 DATA 49,08,48,08,15,15,15,15,55,FF,55, 98, 14, 58,08, 55, 698F 
275 DATA 48,09,48,09,15,15,15,15,55,55,55,55, 14,30, 89, 28, GDAF 
288 DATA 49,C8,48,C9,15,15,15,15,55,AA,55,55, 14, 14,98, 98, 71D4 
285 DATA 49,C9,48,C8,15,09,15,89,55,FF,89,55, 14,3C, 89,09, 75F7 
299 DATA 49,C5,49, C9, 99, 2A, 09, 2A, 89, AA, 09, AA, 95, 28,98, 58, 79C7 
295 DATA 48,49,48,49,15,15,15,15,55,55,55,55, 14, 3C, 89,98, 7CBF 
388 DATA 49,49,49,49,15,15,15,15,55,55,55,55, 99, 28,99, 98, 7F8F 
385 DATA 49,49,49,49,15,15,15,15,55,FF,55,FF, 14, 14, 89,08, 83B3 
319 DATA 49,49,49,49,15,15, 89, 2A, 99, AA,55,55, 14, 14,98,08, 8663 
315 DATA 49,49,48,49,15, 15,98, 24,08, AA, 89, AA, 50, 28, 89,98, 8953 
328 DATA 49,C9,89, 49,09, 15,89, 2A, 99, AA,55,98, 14,3C, 09,98, 8C21 
325 DATA 99,60,08,09,00,69,09,09,96,00,00,09, 00,09, 89,99, 8C21 
339 DATA 7C,C6,88,67,D9,D5, 11,59, C9, 19, D1, C9, 98, DD,5E, 58, 9386 
335 DATA DD,56,91,DD,6E, 82,DD, 66,93, 96, 19,99, 99, 99, 89,C5, 9828 
349 DATA ES5,86,84, 1A,77,13,23,19,FA,E1,CD, 99, AB, C1, 18,EF,9EF6 
345 DATA C9,C9,98,89,91,81,91,91,91,91,81,91,81,91, 91,91, A994 
358 DATA 81,81,81,91,91,81,81,91,91,99,09,90,00,00,98,08, ABOD 
355 DATA 96,80,09,09,66,60,09,060,96,00,80,91, 51,09, 09,99, A99F 
368 DATA 99,99,89, 99,89, 99,00, 60,09,00,09, 60,98, 08,08,91,ABAS 
365 DATA 91,89,99,00,08, 60,09, 90,09, 96,99,00, 99,09, 99,08, ABAI 
378 DATA 99,89,89, 81,81, 60,09, 00,09, 06, 99,65, 99,08,98, 68, ABA3 
375 DATA 99,60,90,60,99,69,09,91,91,00,89,00, 89,09, 89,09, AGAS 
368 DATA 99,96,80, 86,89, 66,09,09,09,00,99,91,01,98, 08,98, ABA7 
385 DATA 99,60,09,60,98,90,98, 60,09, 60,09,09, 89,89, 90,09, ABAT 
398 DATA 96,89,99, 99,89, 98,06, 00,09, 06, 99,00, 09, 08,08, 58, ABA7 
395 DATA 99,89,96, 00,90, 99,06, 00,99, 00,80, 60, 80,09, 89,09, AGAT 
489 DATA 99,90,90,80,80,09,09,00,00,06,06,00,08,00,68,08,AA7 
495 DATA 99,60,99, 60,09, 60,09, 99,09, 90,80,00, 99,09, 99,08, ABAT 
419 DATA 98,80,00, 66,09, 00, 09, 00, 09,06, 09,05, 09,60,99,95, ABA7 





DESTINATION MATHS 


— L'essentiel des connaissances en Mathématiques en 3 logiciels (pour CE.CM6/5). 
— Une démorche pédagogique et un contenu originaux : Le joueur manipule, trace, pèse, évalue 
avance des hypothèses. 

— Une très grande facilité d'emploi avec de nombreuses aides intégrées. 

— Une rédlisation générale exceptionnelle : scénario et décors Futuristes, animations, musiques. 

— Un ouhl unique de complément et de soutien d’une irès grande diversité, oux questions toujours 
nouvelles, qui accompagnera l'élève pendant toute l'année scolaire. 
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Œ1/Œ2 REF : GEN5001CPC PRIX PUBLIC : 199-F° 





CMI1/CM2 REF : GEN5002CPC PRIX PUBLIC : 199-F° 





…/5 REF : GEN5003CPC PRIX PUBLIC : 199-F 





4 SAISONS DE L'ECRIT 


Donnez à vos enfants les moyens et l'envie d'écrire avec : 

— Un traitement de texte simplifié qui permet de rédiger, d'imprimer, de sauvegarder les textes de 
son choix. 

— Des modules de perfectionnement pour écrire sans fautes de ponctuation, enrichir son vocabulaire. 


200 F 
200 F 


Œ/CM7àllans REF: GEN5006CPC PRIX PUBLIC : 225 


6/311àl5Sans REF: GEN5O06CPC PRIX PUBLIC : 225F 








ATTENTION STOCK LIMITE !!! 





415 DATA 96,69,08,00,08,60,00,00,08,00,96,09,90,09, 89,08, AGA7 
429 DATA 59,86,80,99,99, 00,09, 09, 69,00,00,09,09,00,09,95, ASA7 
425 DATA 99,89,09,09,88,69,98,99,D6, AG,88,C5, 4, 6C, 2A, 38, A35C 
439 DATA A1,3A,3C,A1,FE,81,C2,51,A1,11, 14,99, ED, 52,C3,68, AA5G 
435 DATA A1,FE,92,C2,5A,A1,23,C3,68, A1,FE,93,C2,67, A1,11,B27F 
448 DATA 14,88,ED,5A,C3,68, A1,2B,7E,FE,99,CA,95,A1,FE, A, BA55 
445 DATA C2,79,A1,3E,91, 32,33, A9,C9, ED, 5F,E6, 87,FE, #1, CA, C249 
459 DATA 91,A1,FE, 82,CA,91,A1,FE, 93,CA,91,A1,FE, #4, C2, 79, CBAB 
455 DATA A1,32,3C,A1,C9,E5,2A,38, A1, AF,77,E1, 22,38, A1, 3A, D345 
469 DATA 3D,A1,77,2A, 34, A1, 11, A9, BC, CD, 19, AS, 3A, 3C, A1, 2A, D9A3 
465 DATA 3A,A1,91,A9,88,FE,91,C2,C2, A1, ED, 42, 11,64, BD, C3, E133 
478 DATA ES, A1,FE, 92,C2,D1, A1, 23, 23,23, 23, 11, AG, 8D,C3,E5,E95F 
475 DATA AL,FE,93,C2,DE, A1, ED, 4A, 11,9, 8D,C3,E5, A1, 2B, 2B, F296 
489 DATA 2B,2B,11,29,8E, 22, 3A, Af, CD, 19, AS, C9, 98, 58,88, 59,F6F7 
485 DATA 99,99,96,60,08,00,09,00,98,09,80,09,06,09,80,09,F6F7 
498 DATA 99,59, 89,99,89,09,09,09,09,09,08,00,08,08,09,98,F6F7 
495 DATA 96,99,00,00,69,90,08,08,09,00,80,09,06,09,99,28,F71F 
598 DATA C5,83, 89, 5A, A9, EB, C9, 83,96, SA, DD, 21, EC, A1,DD,E5, FEE9 
585 DATA C5,DD,7E,88,FE, 89,CA, 73, A2, DD, 6E, #1, DD, 66, 82, 22, 8699 
519 DATA 38, A1,DD,6E, 83, DD, 66, 94, 22, 3A, A1, DD, 7E, 95, 32, 3C, SCD2 
515 DATA A1,SE, 15,98, 32, 3D, A1, CD, 3E, A1, 3A, 3C, A1, DD, 77,85, 138A 
528 DATA ED, 5B, 34, A1, DD, 73, 93, DD, 72,84, 2A, 38, A1, DD, 75,91, LAA9 
525 DATA DD, 74,92,C1,E1,23,23,23,23,23,23,E5, DD, E, 19, AE, 21D1 
538 DATA C9,C9,89, 89, 89,06, 89,06, 09,09, 09,96, 98, 09,98, 99, 2363 
535 DATA 09,69,06,09,08,60,06,09,09,89,96, 09,960, 09, 89,99, 2363 
888 CLS:PRINT ® FICHIER LANGAGE MACHINE CORRECT..." 

818 PRINT:PRINT:PRINT 

828 PRINT "UNE TOUCHE POUR LA SAUVEGARDE..." 

838 CALL &BB18 

849 SAVE “GHOSROUT",B, &9D28, 8579 





HAMSTER EN FOLIE 


Devenez Le Rockfeller du Hamster ! 
Sourez-vous faire fructifier le petit élevage, vendre et acheter au bon moment ? 
Un passionnant jeu de réflexion et de stimulation économique, follement omusant. 








REF : GEN5007CPC PRIX PUBLIC : 225F 
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DESTINATION MATHS 

















TROUBADOURS 


L'éducatif et l'aventure enfin réunis ! 

Une mission délicate va vous être confiée. Votre connaissance du francais, votre sens poëtique seront 
des atouts dans cette aventure. 

Une Façon tout à fait originale et plaisante d'aborder l'expression écrite, la lecture et le vocabulaire. 
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UTIUSEZ LE BON DE COMMANDE SORACOM 


30 


Lots d'anciens numéros 

Une affaire pour votre Amstrad : ] 
des dizaines d'articles 

et de programmes, 


12 Numéros d’Amstfar 


& CPC années 88 à 91 


12 Numéros d’Amstar 
années 87 à 90. 
55 Francs + 30 francs de port. 


NAN LHLON: 


IEÉXefelife;=A lots en solde. 





Bon de commande NOM mu FI0N0M: 










"1 

I j 
| Je commande Adresse : I 

tal : Ville : 
L © 12 numéros d'Amstar & CPC pour 55 F + 30 F port “s ces | 
| © 12 numéros d'Amstar pour 55 F + 30 F port RP ® | 
| 7 JE REGLE PAR CARTE BANCAIRE - 
Lier t lie Cle es 

M e joins mon règlement chèque bancaire Q l 
ji chèque postal Q mandat Q Date d'expiration | 1 | ; | Signature I 
I il 


Retournez ce coupon, accompagné de votre chèque libellé à l'ordre des Editions SORACOM - La Hale de Pan - 35170 BRUZ 


Grégory NOE 





l'est difficile de taper un programme 

d'une revue sans commettre d'er- 
reurs | Quand les erreurs sont signalées 
(Syntax error in..., Lines does not exist 
in...), la correction est facile puisque 
la ligne est indiquée, mais lorsqu'au 
“point de vue” du CPC, le programme 
est correct, il peut en être tout autre- 
ment pour le lecteur. 
Si le fonctionnement du programme 
ne correspond pas vraiment au pro- 
gramme original, alors Il est impossible 
de retrouver l'erreur commise, à moins 
de comparer les lignes de votre pro- 
gramme avec celles du journal, mais 
c'est très long et on risque de passer 
sur une erreur sans la voir. 
C'est pourquoi ce programme a été 
créé : Il est à utiliser si vous ne retrouvez 
pas vos erreurs. 
La frappe d'un programme de votre 
journal favori (CPC) terminée, vous fal- 
tes "RUN" et là, vous corrigez toutes 
les erreurs signalées par le CPC en vous 
référant au journal pour comparer. Si 
malgré cela.il ne tourne toujours pas, 
suivez cette procédure : 
- sauvez votre programme en ASCII 
grâce à l'instruction : Save "nom prog, 
A. 

- Puis, si vous êtes sur K7, rembobinez 

la bande jusqu'au début du fichier ; 
- chargez Anti-Erreurs ; 


WE SUR MINITEL 


36 15 
Code MHZ 





Valable pour CPC 464, 
CPC 664, CPC 6128 


Ex + Le ÿ 


— entrez le nom de votre programme 
et Insérez le support où il se trouve (K7 
ou disquette). 


Après quelques secondes, les numéros 
de ligne vont défiler. Vous remarque- 
rez qu'à chaque ligne correspond un 
code de 2 lettres sous cette forme : 
>XX : c'est le code qui va vous permmet- 
tre de savoir d'où proviennent les er- 
reurs. Pour cela, il faut que vous com- 
pariez les codes du journal à ceux de 
l'écran. Si un code diffère, notez sur 
papier le numéro de ligne qui corres- 
pond à ce code. Continuez ainsi jus- 
qu'à la fin du listage. Le défilement 
terminé, recherchez votre programme 
et corrigez les lignes que vous avez 
notées en comparant avec le journal, 


#2 





Faites "RUN' et, 6 miracle !, ça marche. 
Attention, lors de la frappe du pro- 
gramme à traiter, n'omettez aucun 
caractère car Anti-Erreurs les prend 
en compte et bien sûr, ne tapez pas 
les codes de contrôle. 


PURE LEE LE ES ETES EL ET ET ET ET EX TT ET SDTR 


24 & LB 
30" # ANTI - ERREURS 4 LC 
404 4 LD 
50 ? * VERSION 2.0 # LE 
60'4 & OLF 
OISE T CU CT CE CT CIEL ETS LT ELET ETC CRT 
80 ? >LH 
90 ? (c) CPC & G. NOE 1987 >] 
100 * >RB 
110? DRC 


120 ? >)222222222222>>2>>>DDDDDDD) RD 
130 "< INITIALISATION > RE 
140 ? CECCECCCECCELCCCECECECCECCC DRE 
150 ? >RG 
160 ON ERROR GOTO 1250 >0 
170 HODE 2 >HH 
180 DIM G$(23) >GD 
190 FOR 1=0 TO 22:READ G$:G$(1)=G$: >FR 


NEXT 

200 "ATTENTION LA LIGNE DE DATA CI- 
DESSOUS NE CONTIENT PAS TOUTES LES 
LETTRES DE L'ALPHABET !!! 


>RC 


210 DATA A,B,C,D,E,F,6,H,J,K,L,M,N, >AD 
P,QR,T,U,V,W,X,Y,2Z 

220 * ANTI-BUG FICHIER RE 
230 IF PEEK(HIHEM+1)=255 THEN 280  >2ZD 
240 OPENOUT "CPC" >HA 
250 MEHORY HIMEM-2 >NX 
260 CLOSEOUT )RJ 
270 POKE HIMEN+1,255 >PP 
280 DEFINT B-Z >WH 
290 ! TB 
300 BORDER 6:1INK 0,1:INK 1,16:PEN 1 >JN 
:PAPER 0 

310 HOVE 0,16:DRAU 650,16 TK 
320 PRINT TAB(27) "ANTI-ERR )GU 
EURS ";CHR$(24); "Version 2.0" 
;CHR$ (24) 

330 HOVE 0,385:DRAN 650, 385 >UJ 
340 LOCATE 24,25:PRINT"CPC REVUE DE DEV 
S STANDARDS AMSTRAD" 

350 WINDOW 1,80,3,23 NL 
360 H$="Realise par Gregory NOE" >HJ 
370 F$="" )IA 
380 FOR 1=1 TO LEN(H$) >PU 
390 F$=F$+HID$ (M$, 1,1) >PL 
400 LOCATE 70-1,5:PRINT F$ JUL 
410 FOR T=1 TO 100 >LQ 
420 NEXT T,! >EF 
430 ' >RH 
(TURN TT ET TETE TETE ETES 
Hi 

450 ? >RK 
460 LOCATE 2,1:PRINT"ENTREZ LE NOM DIT 
DU FICHIER : "; 

470 INPUT "",NF$ >FD 


480 IF NF$="" THEN PRINT CHR$(7):G0 >GR 
TO 460 

490 LOCATE 2,3:PRINT" IMPRIMANTE OU >VR 
ECRAN (1/E)?" 

500 R$="":WNILE R$="":R$=UPPERS INK >NK 
EY$) :WEND 

510 IF R$="l" THEN CA=B:PRINT"BRANC >ID 








HEZ-LA..." ELSE 540 


520 PRINT#8,CHRS#(27);"!";CHR$(20) >AR 
530 GOTO 560 >2F 
540 IF R$="E" THEN CA=0:G0T0 560  »YQ 
550 GOTO 500 >ZB 


560 CLS:LOCATE 2,3:PRINT"TANT QUE L >QR 
E LISTAGE N'EST PAS TERMINE" 

570 LOCATE 2,5:PRINT"NE PAS ARRETER )J4 
LE MAGNETOPHONE OU NE" 

580 LOCATE 2,7:PRINT"PAS SORTIR LA TL 
DISQUETTE" 

590 LOCATE 2,10:PRINT"PRESSEZ UNE T >HH 
OUCHE POUR LA LECTURE" 


600 CALL &BBO5 >LH 
610 ? >RH 
620 ? CLLKCCCCCELECCCCCCLELEC >RJ 
630 ’< TRAIÎTEMENT DU FICHIER ) >RK 
640 ? >222»>22>>2222>D>>DDDDD )TA 
650 ? TB 
660 OPENIN "!"+NF$ >LF 
670 CLS:PRINT"TRAITEMENT EN COURS.. >JR 
" “ 
680 IF LEN(A$)=255 THEN A$="":LINE >Y4 
INPUT89,B$:G0T0 1160 

690 LINE INPUT#9,B$:A$=B$ JUE 
700 IF CAC8 THEN GOSUB 1310 VF 
710 IF INKEY(66)=0 THEN STOP >UN 
720 ? >RK 
730 ? CALCUL DE LA CLE DE CONTRO >TA 
LE 

740 ? >TB 
750 A=0:FLG=0 >HB 
760 FOR 1=1 TO LEN(A$) >PH 
770 L$=HIDS(A$,1,1) HU 


780 IF L$=CHR$(34) AND FLG=1 THEN F >PC 
LG=0:G0TO 840 

790 IF L$=CHR$(34) AND FLG=0 THEN F >PD 
LG=1:G0T0 840 

800 IF L$=CHR$(32) AND FLG(){ THEN )CX 
850 

810 IF L$=CHR#(39) AND FLG=0 THEN B >CA 
60 


820 IF FLG=1 THEN 840 >ND 
830 L$=UPPER$ (L$) >HC 
840 A=A+ASC(L#)+I >LU 
850 NEXT ! >PB 
860 TE 
870 CH$=STRS (A) >CC 
880 CHS=RIGHTS(CH$, LEN(CH$)-1) )TC 
890 L=LEN(CH$) :L2=LEN(CH$)/2 )1A 
900 A=VAL(LEFTS(CH$, L2) ) >)TY 
910 C=INT(A/23) >AH 
920 P=A-(C#23) )LJ 


33 








930 C$=G4(P) )IC 
940 A=VALCRIGHTS(CH$,L-L2) ) >H 
950 C=INT(A/23) :P=A-(C#23) DUT 
960 C$=C$+G$(P) >TD 
970 ? TG 
980 FOR 1=1 TO 6 >K 
990 L$=HID$(A$, 1,1) >MY 
1000 IF L$<C"0" OR L$)"9" THEN 1030 >XJ 
1010 LI$=L1$+L$ >IF 
1020 NEXT XXE 
1030 VH$="":FOR 1=1 TO LEN(A$):IF A )EK 
SCCHIDS(A$,1,1))<32 THEN VH$=VHS+" 

" ELSE VH$=VH$+MID$(A$, 1,1) 

1040 NEXT 1:B$=VM$ WW 
1050 ? )U 
1060 IF CACB THEN 1070 ELSE 1090  DYT 
1070 PRINT LI$;TAB(10) ">";C$ >uZ 
1080 LI$="":G0T0 1160 >ND 


1090 L1$="":PRINT#CA, LEFT$(B$,55):;T >QM 
AB(57) ")";C$ 


1100 IF LEN(B$)€55 THEN 1160 DUT 
1110 FG=1 >CG 
1120 B$=H1D$(B$,56, LEN(B$)) >UB 
1130 PRINTECA,LEFT$(B$,55) > 


1140 1F FG=1 AND CAOB THEN FG-0:G0 >VB 

SUB 1310:G0T0 1150 

1150 GOTO 1100 >LG 
1160 IF EOF=-1 THEN CLOSEIN ELSE GO >HD 

TO 680 

1170 IF CA=0 THEN CALL &BBO3:PRINT >RJ 

TAB(50) CHR$(24) ; "UNE TOUCHE. ..";CH 

R$(24) :CALL &BBO5 

1180 CLS:PRINT"MAINTENANT RECHARGEZ, >JC 
"iNF$;" ET CORRIGEZ LES LIGNES QUE 
VOUS AVEZ NOTEES.." 


1190 END )K 
1200 ? >XF 
1210 ? CCCCCCCLCCCECCCCCCEECELLE D IG 
1220 *< TRAITEMENTS DES ERREURS > >XH 
1230 ? CCKCCCCCCECCCLLCCCCCCELLE DLI 
1240 ? >1K 


1250 IF ERR=25 THEN CLS:PRINT CHR$( >YC 
7);CHR# (24); "FICHIER NON ASCI1";CHR 
$(24):END ELSE CONT 


1260 ! >YB 
1270 ? CLCCCCECCCLCCCELCCCLLCCLEC TC 
1280 *  ATTENTE TOUCHE... > >» 
1290 ? CCCCCCCCCCCCCCCCCCECCCLEC DE 
1300 ? Y1G 


1310 COM=COM+1:IF CON)19 THEN CALL DAF 
&BBO3:PRINT TAB(50) "UNE TOUCHE..." 
:CALL &BB05:CLS:CON=1 


1320 RETURN DEX 


GUIDE DU PROGRAMMEUR 


Votre programme est maintenant fin prêt, il ne vous reste 
plus qu’à envoyer votre œuvre à CPC Infos. 
Mais n'oubliez pas : 
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FLYBALL 





Boris OLIVIER 
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l'une où le joueur devra dépla- 

cer le FLYBALL dans de som- 
bres gouffres. Cette partie possède 
trente tableaux et, j'en suis sûr, met- 
tra à rude épreuve les nerfs des 
Joueurs. 
La seconde est beaucoup plus 
courte car il s'agit de détruire le 
gardien du monde souterrain. C'est 
donc un jeu qui mettra en valeur les 
réflexes du joueur. 


F lyball comporte deux parties : 


Les instructions se trouvent dans le 
Jeu et pour le charger il faut taper 
RUN'FLYBALL”. 

Le jeu est composé de quatre pro- 
grammes : 

FLYBALL :1K 

FBREGLES : 4 K 

FBJEU : 17 K 

MONI : 5K 

Donc un total de 27 K pour ce jeu. Il 
faudra garder ces noms sinon, le jeu 
ne pourra fonctionner. De plus, il est 


recommandé de sauvegarder le jeu 
avant de jouer (surtout pour la par- 
tie du monstre). 


Enfin, voici quelques trucs pour ve- 
nir à bout du jeu : 

- pour la partie *FBJEU”, aller en Ii- 
gne 4 et mettre à la variable “vie” 
autant de vies que vous le désirez ; 
- pour tuer le monstre final, il faut 
que la statuette qui clignote soit 
grise, sinon. 








FLYBALL « 


BAS 


18 ! 

28 ‘ 

38 SYMBOL 255,192, 192, 182, 192, 192 
48 DEFINT a-z 


54 MODE #:TAG:INK 1,8:INK 2,9:INK 3,9:INK 4,8: INK 9,8:B >FP 


ORDER 8 

68 cr=i:titre$="Hard Soft" 
78 nc=LEN(titre$) :np=nc48 
88 hc=(639-nc164)/2 


99 MOVE 1,399:GRAPHICS PEN 4:PRINT titres; :GRAPHICS PEN DZ 


1 





PRINT CHR$(255); 


188 rhce=hc:htc:1:vce=232:vtc=398 )AA 
119 FOR t=1 TO 8:FOR tt=1 TO np >XP 
128 cr=cr+ti:lF cr>3 THEN cr={ NC 


138 IF TEST(htc,vtc)=4 THEN MOVE hc,vc:GRAPHICS PEN cr: >UC 


149 hc=hctB:htc=htc+4 )QF 
158 NEXT:ve=ve-B:vte=vte-2:htc=1:hc=rhc:NEXT TT 
189 INK 1,2:INK 2,2:INK 3,2 UF 
>LA 185 TAGOFF D'EI 


>LB | 198 INK 18,2,11:LOCATE 7,19:PEN 18:PRINT"presente" >XH 





»2E | 288 CALL &BB96 )LE 

>pPA | 219 RUN'"fbregles" >QF 

NF FBRECGLES - BAS 

)vQ 

MA | 1 MODE 9:GOSUB 1998 HZ 
2 xec=6 VF 
5 RESTORE 45:FO0R op=1 TO 7:READ a$ >BN 
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6 INK 1,26:PEN 1! 
19 xec=xec+i:LOCATE xec,{6:PRINT a$ 


AE 
>DF 
15 FOR j=15 TO 1 STEP-{:SOUND 1,499, 1,j,8,9,39:NEXT j:N FF 
EXT op 


28 FOR p=799 TO 1 STEP -1:SOUND 1,p,1,15:NEXT HG 
25 INK 1,25:F0R i=1 TO 159:NEXT »YQ 
38 INK 1,15:FO0R i=1 TO 159:NEXT >YK 
35 INK 1,16:FOR i=1 TO 15#:NEXT JR 
48 FOR i=1 TO 1B9B:NEXT Qu 
45 DATA F,L,Y,B,A,L,L >PX 
49 MODE 1:INK #,15:1INK 1,3:PEN 1:BORDER 15 HN 
5g LOCATE 11,1:PRINT"REGLES de FLYBALL" >KK 
68 LOCATE 11,2:PRINT"----------------- " )EX 
65 LOCATE 22,4:PRINT'"de Boris OLIVIER" >LJ 
78 LOCATE 2,7:PRINT" Vous cherchez a prouver que la ter >UH 
re" 

88 PRINT " est creuse et qu'une autre civilisa-" )FQ 
98 PRINT" -tion y prospere." DD 
189 PRINT:PRINT" Une nouvelle grotte a ete decouverte" DRD 
118 PRINT" et vous pensez qu’elle pourez etre le" )JA 
129 PRINT" passage pour acceder a ce fabuleux" )DX 
138 PRINT" monde." >PX 
149 PRINT:PRINT" Vous decidez alors de tenter votre " PE 
158 PRINT" chance grace a votre FLYBALL concut * DT 
169 PRINT" pour l'exploration souterrain." )ZU 
178 PRINT:PRINT" Parviendrez-vous au bout de ce long" >PM 
188 PRINT" voyage, surtout que la legende conte" GA 
194 PRINT" qu'il y a un terrifiant gardien..." >BU 
299 CALL &WBBA6:FOR t=25 TO 49:LOCATE 1,t:PRINT STRING$( DTF 
1,CHR$(32)); :LOCATE 48,t:PRINT STRINGS(1,CHR$(32)) ; :NEX 
T:CLS 

219 LOCATE 1,5:PRINT" #Joy => :rotation de FLYBALL =)" FA 
228 PRINT:PRINT " #Joy <= :rotation de FLYBALL <=" )BT 


239 PRINT:PRINT " #FIRE activer les moteurs de FLYBALL >NH 


248 PRINT:PRINT: PRINT" 
vrir" 

259 PRINT" son point faible..." 
268 PRINT:PRINT" 


Pour le gardien,a vous de decou >YV 


FX 
ATTENTION !!! Pendant toute la duree" DLR 


278 PRINT" du jeu,il faut laisser la D7 dans le" )DY 
288 PRINT" lecteur." TP 
299 PRINT:PRINT" BONNE CHANCE" >KL 
899 PRINT" ------------ * >ZH 


319 CALL &BBB6:FOR t=25 TO 49:LOCATE 1,t:PRINT STRINGS( DJX 
1,CHR$ (32) ) ; :LOCATE 49, t:PRINT STRING$(1,CHR$(32)) ; :NEX 
T:RUN'"fbjeu” 


1998 »XD 
1919 Dessin de presentation )XE 
1928 ? XF 


1839 INK D,8:1INK 1,8: INK 2,8: INK 3,9:INK 4,8: INK 5,8:IN DEA 
K 6,8:INK 7,8:1NK 8,9: INK 9,9:1INK 18,8: INK 11,8:INK 14, 
ÿ:INK 15,8:BORDER 8 


1849 GRAPHICS PEN 9 NE 
1989 RESTORE 1119 >LL 
1998 FOR i=1 TO 32:READ a,b DU] 





1198 PLOT a,b:NEXT NY 
1118 DATA 192,194, 192, 192,192, 198, 196, 188, 288, 196, 258,1 >LA 
94,288, 192, 286, 199,289, 188,289, 186, 295, 184, 290, 184,294, 
188, 298, 194, 298, 192, 298, 198,564, 188,564, 186, 564, 184,568 

, 182,572,199,572, 188,572, 186,572, 184,572,182,572, 188,57 
2,178,572,176,576, 182,588, 1B8, 588 


1129 DATA 186,589, 184 >NK 
1138 GRAPHICS PEN 19 JNV 
1149 PLOT 268,192:DRAW 336, 192 XX 
1158 PLOT 64,178:DRAV 132,178 )WB 
1169 PLOT 429,176:DRAW 584,176 >XP 
1178 PLOT 8,216:DRAU 636,216 VF 
1189 RESTORE 12189 UN 
1198 FOR i=1 TO 19 )LQ 
1288 READ a,b:DRAW a, b:NEXT DL 


1219 DATA 636,222, 489, 224, 466,274, 464,274, 468,242, 452,2 
42,432,272, 384, 272,384, 226, 184, 222, 189,272,176,270,176, 
244,164,244,156,278, 189,278, 189,222,9,218,9,216 


DUT 


1226 ORIGIN 132,228:FILL 18:0RIGIN 9,8 )EC 
1239 GRAPHICS PEN 2 NY 
1249 PLOT 9,228 UD 
1258 RESTORE 1289 )LU 
1269 FOR i=1 TO 17:READ a,b JUL 
1278 DRAV a,b:NEXT NN 


1289 DATA 96,222,96,278, 169,289, 164,246, 172, 246, 176,272 DPP 
,184,274,184,224, 389, 228,389, 276, 436,276, 448,244, 456, 24 
4,469,276,472,276, 476, 226,636, 224 


1285 ORIGIN 612,246:FILL 2:0RIGIN 9,9 )EB 
1299 RESTORE 132ÿ LT 
1295 GRAPHICS PEN 5 XNN 
1399 FOR i=1 TO 8:READ a,b,c,d JUZ 
1318 PLOT a,b:DRAW c,d'NEXT WF 


1329 DATA 155,342,272,342, 198, 326, 228, 328, 224, 276, 312,2 
76,292, 278,348, 278,248, 264, 349,264, 228, 258,292, 258,524, 
292,698, 292, 599, 284,592,284,516,276,668, 276 


LD 


1338 GRAPHICS PEN 15 NC 
1349 PLOT 194,268:DRAW 194, 242 YXE 
1355 PLOT 194,236:PLOT 194,234 XV 
1369 PLOT 194,238:PLOT 194,239 >XK 
1375 PLOT 388,268:DRAN 388, 258 JX4 
1389 PLOT 388,252:PLOT 388, 259 »XZ 
139$ PLOT 388,242:DRAN 388, 236 >XK 
1499 PLOT 464,279:DRAW 464, 264 DAT 
1415 PLOT 464,254:DRAN 464,248 XY 


2889 INK 9,16:INK 1,26:1INK 2,4:INK 3,2:INK 4,1:1NK 5,14 DYY 
: INK 6,28:INK 7,8:INK 8,13: INK 9,9:INK 19,15:INK 11,16: 
INK 14,11:INK 15,3:BORDER 16 


2819 RETURN )EG 


FBJEU -« BAS 


1 ORIGIN 9,8:MODE 1:INK 9,8:INK 1,6: INK 2,9: INK 3,9:B0R >DD 
DER # 

2 WINDOW#3, 1,49, 1,25 )NB 
3 GOSUB 6899 >BB 
4 vie=9:1=328:y=288:posi=1:vais$=CHR$(218) :x2=329:y2=28 DWH 
9:TAB1=4:fuel=199988 :GOSUB 5989 
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5 GRAPHICS PEN 1:TAG >PP 
18 GOSUB 5989:1F JOY(#)=8 THEN posi=posit{:IF posi=9 TH »2V 
EN posi=1:G0T0 1989 

28 IF JOY(#)=4 THEN posi=posi-1:[F posi=8 THEN posi=8:G >KD 
OTO 1989 

34 IF JOY(#)=16 THEN GOSUB 2989 JXN 
35 IF J0Y(#)>=17 AND JOY(#)<=16 THEN GOSUB 2988 JB 
48 IF JOY(#)>=$ AND JOY(#)C8 OR JOY(#)>=9 AND JOY(#)<=1 >CU 
2 THEN MOVE x,y:PRINT" ";:y=y-4:GRAPHICS PEN 1:MOVE x,y 
PRINT vais$:; 

45 IF JOY(#)>=17 THEN GOSUB 2998 YL 
58 t1=TEST(x,y):t2=TEST(x,y-16):t3=TEST(x+16,y):t4=TEST >QD 
(x+16,y-16):t5=TEST(x-1,y):1F ti+t2+t3+t4+t5)1 THEN GOS 

UB 7999:vie=vie-1:GOSUB 3898 


64 ELSE GOTO 18 YF 
1909 »X) 
1918 VALEURES DES POSITIONS )XE 
1929 XF 
1938 1F POSi:1 THEN vais$=CHR$ (218) :GOTO 1118 >MH 
1949 IF POSI=2 THEN vais$=CHR$(213) :GOTO 1119 ME 
1858 1F POSi:3 THEN vais$=CHR$(216) :GOTO0 1118 >HK 
1968 IF POSi:4 THEN vais$=CHR$(214):GOTO 1119 >MK 
1878 1F POSi:5 THEN vais$=CHR$(219) :GOT0 1119 JM 
1989 IF POSi:6 THEN vais$=CHR$(215):GOTO 1118 >MQ 
1998 IF POSi=7 THEN vais$=CHR$(217) :GO0TO0 1119 >MV 
1199 IF posi=8 THEN vais$=CHR$(212) :GOTO 1119 MG 
1118 MOVE x,y:PRINT vaist; )WA 


1129 IF p2Oposi THEN MOVE x,y:PRINT" ";:y=y-4:GRAPHICS >DN 
PEN {:MOVE x,y:PRINT vais$; :p2=posi 


1139 GOTO 19 »YA 
2898 )XE 
2819 DEPLACEMENT )XF 
2828 )XG 
2938 MOVE x,y:PRINT" "; )TE 
2849 IF posi=1 THEN y=y+8:G0TO 2129 CD 
2859 IF posi=2 THEN x=x+8:y=y+8:GO0T0 2129 )JB 
2868 IF posi=3 THEN x=x+8:G0T0 2129 CF 
2878 IF posi=4 THEN x=x+8:y=y-8:GOTO 2129 >JH 
2888 IF posi=5 THEN y=y-8:G0TO 2129 )CP 
2899 IF posi=6 THEN x=x-8:y=y-8:G0T0 2129 )JP 
2198 IF posi=7 THEN x=x-8:GO0TO 2129 )CG 
2119 IF posi=8 THEN x=x-8:y=y+8:G0T0 2128 )JG 
2128 GRAPHICS PEN 1:MOVE x,y:PRINT vais$; XKJ 
2139 fuel=fuel-1:1F fuel(8 THEN GOTO 3998 )JP 
2148 RETURN DFA 
3998 XF 
3819 PERDU/GAGNE >XG 
3929 >XH 


3838 1F fuel(i THEN CLS:TAGOFF:LOCATE 5,18:PEN 1:PRINT" )XF 

Plus de fuel=)Votre mission s’acheve..."::FOR i=1 TO 28 

BY:NEXT:CALL &BB96:G0T0 3979 

3948 IF vie(1 THEN CLS:TAGOFF :LOCATE 8, 19:PEN 1:PRINT"M >BF 

ission inachevee..."::FOR i=1 TO 2988:NEXT:CALL &BB96:G 

OTO 3979 

3858 IF TABI=38 THEN TAGOFF:CLS: INK 9,1:LOCATE 5,19:PEN TB 
1:PRINT"Vous etes arrive mais il y a un gardien...":F0 

R i:1 TO 289B:NEXT:CALL &BB96: INPUT"D7 DANS LE LECTEUR 

S.V.P (o)";a$:1F a$="o" THEN RUN"mon!" ELSE GOTO 3959 

3868 1F vie>8 THEN x=x2:y=y2:CLS:TAGOFF:LOCATE 19,19:PR MH 





INT'vie="s;vie:LOCATE 19,11:PEN 1:PRINT'fuel="; fuel :FOR 

i=1 TO 19B8:NEXT:CALL &BB96:TAG:GOSUB 5979 :GOTO 18 

3979 CLS: INPUT" Une nouvelle partie";a$:IF a$="o" THEN R DWN 
UN ELSE END 


5898 >XH 
5918 ? SORTIE DES TABLEAUX X] 
5828 JXK 


5925 IF x>-8 AND x<648 AND y>-8 AND y<498 THEN RETURN DUT 
5838 1F xC=-8 THEN TABI=TABI-1:x2=632:y2=y:G0TO 5878  DXH 
5949 IF x>=648 THEN TABI=TAB1+1:x2=8:y2=y:GOTO 5979 MY 
5958 IF yC=-8 THEN TABI=TAB1+7:x2=x:y2=392:G0T0 5878 XX 
5969 IF y>=498 THEN TABI=TABI-7:x2=x:y2=8:GOT0 5979 JC 
5878 CLS:INK 8,8:INK 1,8:1NK 2,8: INK 3,8:0RIGIN 9,9 )TP 


5989 IF TABI=4 THEN GOSUB 19919:G0T0 5388 HL 
5898 1F TABI=11 THEN GOSUB 19139:GO0T0 5389 HG 
5198 IF TABI=18 THEN GOSUB 19258:G0T0 5388 HA 
5118 1F TABI=17 THEN GOSUB 19359:GO0T0 5388 JB 
5128 IF TABI=16 THEN GOSUB 18489:G0T0 5388 )JF 
5138 1F TABI=15 THEN GOSUB 19629:GO0T0 5388 JB 
5149 IF TAB1=22 THEN GOSUB 1976#:G070 5389 )JF 
5158 1F TAB1=29 THEN GOSUB 19999:GO0T0 5389 >JK 
5169 IF TAB1=38 THEN GOSUB 11949:G0T0 5389 HG 
5179 IF TABI=23 THEN GOSUB 11189:G0T0 5389 )JG 
5188 IF TAB1=24 THEN GOSUB 11329:G0T0 5389 )JE 
5198 1F TABI=31 THEN GOSUB 11469:G0T0 5388 )JJ 
5298 IF TAB1=32 THEN GOSUB 11598:G0T0 5389 JF 
5218 IF TABI=33 THEN GOSUB 11739:G0T0 5388 )JD 
522ÿ IF TAB1=26 THEN GOSUB 11879:G0T0 5388 )JN 
5238 IF TABI=19 THEN GOSUB 12819:GO0T0 5388 )JB 
5249 IF TABI1=12 THEN GOSUB 12158:G0T0 5389 )JA 
5258 IF TABI=13 THEN GOSUB 12299:G0T0 5388 )JH 
5269 IF TAB1=28 THEN GOSUB 12438:G070 5388 JC 
5278 1F TABI=21 THEN GOSUB 12579:G0T0 5388 )JK 
5288 IF TAB1=28 THEN GOSUB 12718:G070 5388 JP 
5298 IF TAB1=35 THEN GOSUB 12859:G070 5388 JU 
5389 IF TAB1=34 THEN GOSUB 12998:G0T0 5389 JP 
5318 1F TABI=41 THEN GOSUB 13139:G0T0 5388 >HH 
5328 IF TAB1=42 THEN GOSUB 13278:G0T0 5388 »JG 
5334 IF TABI=49 THEN GOSUB 13419:G0T0 5388 )JL 
5349 IF TABI=48 THEN GOSUB 13559:G0T0 5389 JR 
5358 1F TABI=47 THEN GOSUB 13699:G0T0 5388 )JX 
5369 IF TAB1=49 THEN GOSUB 13638:G0T0 5389 JL 
5378 IF TAB1=39 THEN GOSUB 1397$:G0T0 5388 )JB 
5375 IF TAB1=38 THEN GOTO 3994 »XQ 
5388 IF TABI=4 THEN INK 9,8:INK 1,6:1INK 2,19:INK 3,1 TX 
5398 IF TAB1)7 AND TABI<22 THEN INK 8,9: INK 1,6:INK 2,1 GP 
5:1NK 3,3 

5498 IF TAB1>21 AND TABI<36 THEN INK 9,8:INK 1,6:INK 2, DHN 
3: INK 3,15 


5418 IF TAB1»35 AND TABI<58 THEN INK 8,1:INK 1,6:INK 2, DHH 
g:INK 3,19 
5428 x=x2:y=y2:GRAPHICS PEN 1:NOVE x,y:PRINT vais$; )YA 


5438 RETURN >FF 
6999 YXJ 
6919 *  SYMBOLS >XK 
6929 ‘ )YA 


6939 SYMBOL AFTER 179:SYMBOL 216,69, 114,241,241,241,241 GA 
, 114,68 
6948 SYNBOL 217,69, 78, 143, 143, 143, 143, 78,69 NI 
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6959 SYNBOL 218,69,66, 129, 129,255, 255, 126,68 KW 
6968 SYHBOL 219,69, 126,255, 255, 129, 129, 66,68 XKY 
6979 SYNBOL 212,69,66, 131,135, 143, 159, 126,69 KE 
6988 SYNBOL 214,69, 126,249, 241,225, 193, 66,68 XKQ 
6998 SYNBOL 215,68, 126, 159, 143, 135, 131,66, 69 XKK 
6198 SYHBOL 213,69,66,193,225,241,249, 126,68 KG 
6119 SYMBOL 228,249,252,182,191,216,255,248,9 DUT 
6129 SYNBOL 221,146, 73,255, 255,73, 146,9, )GA 


6138 SYMBOL 222, 196, 242,255, 255, 242, 196,0, 8:poi$=CHR$(2 DDE 
22) +CHRS (221) 4CHR$ (228) 

6178 SYMBOL 226, 7,5,7,8,16,56,96,176:cleft-CHR$(226) VB 
6188 SYHBOL 227,8,63,111,95,95, 127, 127,63 )GR 
6198 SYNBOL 228, 9,252, 254, 254,250, 258, 246, 252:brig$=CHR DUM 
$(227)+CHR$ (228) 

6228 SYMBOL 231,8,3,5,19,84,49,48,72:poign$=CHR$(231) WP 
6249 SYMBOL 233, 24, 24,8, 43, 72,8, 29, 34:squet=CHR#(233)  DUV 
6258 SYMBOL 234, 192, 199, 16, 72, 71, 72,8,B:squep$=CHR$(234 DAF 
) 

6268 SYMBOL 235,3, 37,158, 136, 148, 162, 192, 252:encpt=CHR$ DET 
(235) 

6278 SYXBOL 236,66, 68, 192,98, 219, 192,68,66:bar$=CHR$(23 AL 
6) 


6288 RETURN DFK 
7998 | >XK 
7918 '  EXPLOSION YA 
7928 ? »B 
7838 FOR i=9 TO 7:SOUND 1,8,15,15,9,9, i#3:NEXT NC 
7948 RETURN DFE 
19988 )CG 
19919 ? TABLEAU 4 CH 
19928 ' )CJ 
19839 PAPERK3,B:CLS43:GRAPHICS PEN 2 )DY 


19648 PLOT 465,1:DRAW 465,28:DRAN 384,99:DRAN 384,154:D >CP 
RAW 398,154:DRAW 1,83:PLOT 1,14#:DRAN 373, 149:DRAW 373, 

! 

19958 ORIGIN 396,38:FILL 2:0RIGIN 8,9 )EC 
18869 WINDOW#4, 1,24, 17,25: PAPER#4, 2:CLSHW4 JJN 
19978 PLOT 649,83:DRAN 559,154:DRAW 435,154:DRAW 435, 11 DXM 
4:DRAW 457,117:DRAW 538,44:DRAW 538,1 

19988 PLOT 28,198:DRAN 115,368:DRAW 528,368:DRAU 528,32 >PY 
ÿ:DRAW 589,138 


19998 ORIGIN 549,39:FILL 2:0RIGIN 8,9 )EH 
19198 ORIGIN 634,162:FILL 2:0RIGIN 9,8 >EB 
19118 RETURN )LF 
19129 ? >CK 
19138 ' TABLEAU Î1 )DA 
19149 ? DB 
19154 PAPER#3,2:CLS#3:GOSUB 15998:GRAPHICS PEN 9 RT 


19169 PLOT 465, 499:DRAN 465,337:DRAW 518,337:DRAN 518,2 )2X 
95:DRAW 438,295:DRAW 438, 162:DRAN 371,162:DRAW 371,381: 
DRAV 317, 391:DRAN 317,364:DRAW 177,364:DRAN 177, 398:DRA 

V 177,389:DRAU 119, 388:DRAN 119,228:DRAW 1,228 

19179 PLOT 553, 498:DRAN 553,261:DRAW 474,261:DRAW 474,1 »2V 
3B:DRAN 369,139:DRAW 369, 185:DRAN 298,195:DRAW 298,187: 
DRAW 325,187:DRAW 325,249:DRAW 272,248:DRAW 272,312:DRA 

V 219,312:DRAW 219,266:DRAN 158, 198:DRAW 1,198 

18188 ORIGIN 17,224:FILL S:ORIGIN 8,8 >DU 
19238 RETURN )LJ 
18249 DC 





19258 ' TABLEAU 19 DD 
19268 ? DE 
19278 PAPER#3,2:CLS#3:GOSUB 159#8:GRAPHICS PEN 9 >R4 
19289 PLOT 649,235:DRAW 497,235:DRAW 497,329:DRAN 69,32 >PG 
S:DRAW 69, 188:DRAW 231,189:DRAW 231,197:DRAN 262, 197:DR 

A 262,1 

19298 PLOT 649,181:DRAW 497,181:DRAW 497, 145:DRAV 458,1 >UR 
45:DRAW 459,274:DRAW 112,274:DRAW 112,218:DRAN 279,218: 
DRAW 278,151:DRAW 343, 138:DRAW 343,1 


19398 ORIGIN 76,198:FILL S:ORIGIN 8,8 DIX 
19338 RETURN >LK 
19349 ? DD 
19358 ? TABLEAU 17 DE 
19368 ? >DF 
19378 PAPER#3,2:CLS#3:GOSUB 15998:GRAPHICS PEN 9 >RX 
19389 PLOT 262, 499:RESTORE 19419 >ZH 
18398 FOR i=1 TO 8:READ a,b JUL 
19499 DRAW a,b:NEXT >ND 


18419 DATA 262,344, 184,344, 184,284, 269, 124,269, 96, 162,9 >PD 
6,116,264,9,264 


18428 PLOT 343, 4Y9:RESTORE 19459 )ZG 
18438 FOR i=1 TO 9:READ a,b >UG 
19448 DRAN a, b:NEXT >NH 


18458 DATA 343,398, 252,398, 252, 224,342, 128, 342,52, 166,1 ME 
6,98, 16,69, 186,8, 186 


19468 ORIGIN 338,82:FILL 9:DRIGIN 9,9 )DV 
19478 RETURN ME 
19488 DJ 
19498 *  TABLEAU 16 >DK 
19598 DB 
19519 PAPER#3,2:CLSH3:GOSUB 15899:GRAPHICS PEN RT 
19528 PLOT 649,264:RESTORE 19559 )2T 
19539 FOR i=1 TO 5:READ a,b UD 
19548 DRAN a,b:NEXT JN] 
19559 DATA 562,264, 335, 382, 166, 382, 78, 278,8, 278 >MB 
19568 PLOT 649, 186:RESTORE 19599 )ZE 
19579 FOR i=1 TO 6:READ a,b UJ 
19588 DRAV a, b'NEXT NN 


19599 DATA 564, 156, 466, 298, 398, 322,298, 322,114,219,0,21 >XK 
ÿ 


18688 ORIGIN 6,238:FILL S:0RIGIN 9,8 )DD 
19619 RETURN JA 
19628 )DE 
19638 ?  TABLEAU 15 )DF 
18649 " )DG 
18658 PAPERK3,2:CLS#3:GOSUB 15989:GRAPHICS PEN 9° RY 
19668 PLOT 649,278:RESTORE 19699 »2J 
18678 FOR i=1 TO 7:READ a,b UL 
19688 DRAVW a,b:NEXT NP 
19699 DATA 512,278, 468, 338, 322, 338, 74, 299,52, 162, 262,18 )EH 
5,262,9 

19788 PLOT 649,219:RESTORE 19739 )ZH 
19718 FOR i=1 TO G6:READ a,b DUE 
19728 DRAN a,b:NEXT N] 


19738 DATA 474,299, 388, 274, 134,238, 112, 198, 348,126,348, >XP 
ÿ 


19748 ORIGIN 79,176:FILL 9:ORIGIN 9,9 )DB 
19759 RETURN MF 
19768 " >DK 





19779 *  TABLEAU 22 

19788 ‘ 

19798 PAPERK3,2:CLS#3:GOSUB 15889:GRAPHICS PEN $ 
19898 PLOT 262, 489:RESTORE 19839 

19818 FOR i=1 TO 7:READ a,b 

19828 DRAN a,b:NEXT 

18839 DATA 264,348, 395, 348, 398, 311,263, 397, 262,221,379, 
129,379, 1 

18848 PLOT 348, 399:RESTORE 19879 

18859 FOR i=1 TO 5:READ a,b 

19868 DRAV a,b:NEXT 

19878 DATA 348,345, 333,345, 333, 225,439, 145, 439,1 
19888 ORIGIN 278,398:FILL #:0RIGIN 8,8 

18898 RETURN 

18988 

19919 ?  TABLEAU 29 

19928 

19939 PAPERK3,2:CLS43:GOSUB 15889:GRAPHICS PEN # 
18948 PLOT 379, 499:RESTORE 19979 

18958 FOR i=1 TO 13:READ a,b 

19968 DRAN a, b:NEXT 

19978 DATA 378,338, 276, 338, 278, 304,294,394,294,242,118, 
242,32, 136, 32, 38,94, 28, 376, 29, 436, 176,568, 116,649, 116 
18989 PLOT 439,499 :RESTORE 11918 

18998 FOR i=1 TO 11:READ a,b 

11998 DRAW a,b:NEXT 

11919 DATA 438,296, 336,296, 338, 266, 268, 266,269, 294, 179, 
284,119,134, 116,76, 149,68, 416,248, 649, 186 

11928 ORIGIN 48,134:FILL S:DRIGIN 9,9 

11838 RETURN 

11948 

11955 ?  TABLEAU 38 

11969 

11978 PAPERN3,2:CLS#3:G0OSUB 15889:GRAPHICS PEN ÿ 
11988 PLOT 9,116:RESTORE 11119 

11898 FOR i=1 TO 9:READ a,b 

11188 DRAN a,b:NEXT 

11119 DATA 186,116, 219, 84,298,84, 316, 112,279,212,378,25 
5,438,228, 498,249, 356, 498 

11128 PLOT 8, 186:RESTORE 11158 

11138 FOR i=1 TO 5S:READ a,b 

11149 DRAW a,b:NEXT 

11158 DATA 184,186,238,214, 238,296, 352, 296, 246, 498 
11168 ORIGIN 6,136:FILL 9:ORIGIN 9,8 

11179 RETURN 

11189 ? 

11198 TABLEAU 23 

11298 

11218 PAPER#3,2:CLS#3:GOSUB 1599B:GRAPHICS PEN 9 
11228 PLOT 356,8:RESTORE 11258 

11238 FOR i=1 TO S:READ a,b 

11248 DRAW a,b:NEXT 

11258 DATA 416,264, 216, 282, 238,314, 479, 282,649, 148 
11269 PLOT 246,8:RESTORE 11299 

11278 FOR i=1 TO 9:READ a,b 

11268 DRAW a, b:NEXT 

11298 DATA 246,152,338, 152, 338,212, 176, 212, 192,378, 368, 
376, 364,334, 569, 332,649, 236 

11388 ORIGIN 116,354:FILL B:ORIGIN 8,9 


DEA 
)EB 
>RD 
)ZL 
>UG 
>NK 
GX 


>ZU 
DUJ 
>NP 
DNA 
)EY 
NA 
>DF 
>DG 
>DH 
>RZ 
>2G 
>UQ 
)NQ 
>XK 


>2T 
DUT 
NA 
>BD 


)CC 


>XA 
JUA 
NF 
)QG 
>DC 
)MC 
>DG 
>DH 
>CK 
>RQ 
»>XB 
DUB 
>NG 
)QF 
)XR 
>UK 
NL 
)FX 


)EA 





11319 RETURN )LJ 


11328 )DC 
11338 ’  TABLEAU 24 >DD 
11348 )DE 
11359 PAPER83,2:CLS#3:GOSUB 15899:GRAPHICS PEN $ >RU 
11368 PLOT 9, 148:RESTORE 11398 >XC 
11378 FOR i=1 TO 8:READ a,b UK 
11388 DRAV a, b:NEXT >NH 


11398 DATA 238, 222,282, 316, 336, 316, 326, 224, 492,216,386, DRR 
169,249, 148,294,9 


11498 PLOT 9,236:RESTORE 11439 )XY 
11418 FOR i=1 TO 8:READ a,b DUE 
11428 DRAW a, b:NEXT >NG 


11439 DATA 248,379,3686, 354, 378,274,464,239, 418,88, 322,1 >PK 
18,298, 72, 332,9 


11448 ORIGIN 8,216:FILL 8:0RIGIN 9,8 )DE 
11458 RETURN >HD 
11468 )DH 
11479 *  TABLEAU 31 »DJ 
11488 ' DK 
11485 PAPERK3,2:CLS#3:G0SUB 15989:GRAPHICS PEN 9 RF 
11498 PLOT 284, 49B:RESTORE 11529 >ZK 
11588 FOR i=1 TO 7:READ a,b UD 
11518 DRAW a, b:NEXT )NG 


11528 DATA 294, 336,295, 248, 389, 244,494, 168, 599,159,538, >GQ 
76,649,68 


11538 PLOT 332, 49B:RESTORE 11569 )ZL 
11549 FOR i=1 TO 8:READ a,b UJ 
11558 DRAN a, b:NEXT NL 


11568 DATA 334, 356,294, 328, 329, 298, 424,284, 444,212,558, DV] 
184,568, 138,649, 158 


11578 ORIGIN 229,388:FILL B:ORIGIN 9,9 DEN 
11588 RETURN >MH 
11598 )EB 
11699 ?  TABLEAU 32 >DD 
11618 ? )DE 
11625 PAPERN3,2:CLS#3:GOSUB 15889 :GRAPHICS PEN 9 RU 
11638 PLOT 9,68:RESTORE 1166 XD 
11648 FOR i=1 TO 9:READ a,b JUL 
11658 DRAV a,b:NEXT >NH 


11668 DATA 23$,68,238, 172,334, 172, 334,278, 459, 285, 486, 1 >BA 
86,539, 128,539,66,649,66 


11678 PLOT 8,159:RESTORE 11789 »>XC 
11688 FOR i=1 TO 19:READ a,b JUN 
11698 DRAW a, b:NEXT JR 


11788 DATA 142,162, 294, 248, 262,248, 284, 356,359, 356,532, DTN 
318,532,216,574,158,574,116,649, 116 


11718 ORIGIN 6,118:FILL S:0RIGIN 8,8 DD 
11728 RETURN >MD 
11738 DH 
11748 ”  TABLEAU 33 DJ 
11758 >DK 
11768 PAPER#3,2:CLS#3:G0OSUB 15989:GRAPHICS PEN ÿ RB 
11778 PLOT #,66:RESTORE 11899 )XC 
11788 FOR i=1 TO 8:READ a,b >UQ 
11798 DRAW a,b:NEXT NT 


11899 DATA 158,66, 242, 136,348, 142,368, 224, 464,224,572,2 >UN 
86,578, 344,378, 499 
11818 PLOT 9,116:RESTORE 11848 >XF 
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11828 FOR 1=1 TO B:READ a,b 
11838 DRAN a,b:NEXT NH 


11849 DATA 32,116, 134,294,256,216, 398, 288, 424, 294, 414,3 DUB 
16, 286, 348,268, 495 


>UK 


11858 ORIGIN 19,96:FILL S:0RIGIN 9,8 DJ 
11868 RETURN M] 
11878 ' )EC 
11889 *  TABLEAU 26 >ED 
11898 ? EE 
11998 PAPERK3,2:CLSH3:G0SUB 15889:GRAPHICS PEN # RI 
11919 PLOT 378,8:RESTORE 11948 >YK 
11928 FOR i=1 TO 11:READ a,b DUL 
11938 DRAW a,b:NEXT JNN 
11949 DATA 378, 196,168, 144, 168, 296, 286, 296, 322,156,422, DEF 
146,518, 195, 589, 199,522, 374, 384, 374,384, 499 

11958 PLOT 268,9:RESTORE 11989 JYR 
11968 FOR i=1 TO 9:READ a,b JUR 
11978 DRAW a,b:NEXT NT 
11988 DATA 268,58, 64,58, 64, 289, 372, 289, 398, 198, 468,198, AP 
496,322,279, 322,278, 499 

11998 ORIGIN 89,74:FILL S:0RIGIN 8,8 )DT 
12888 RETURN >LF 
12918 >CK 
12928 ’  TABLEAU 19 >DA 
12938 DB 
12948 PAPER#3,2:CLSH3:GOSUB 15999:GRAPHICS PEN # RT 
12958 PLOT 384,B:RESTORE 12988 >XG 
12968 FOR i=1 TO 8:READ a,b >UG 
12878 DRAN a,b:NEXT JNJ 
12988 DATA 366, 196, 386, 234, 354, 252, 284, 266, 284,299,414, VU 
295,412,336, 378, 398 

12898 PLOT 278,8:RESTORE 12128 »XZ 
12198 FOR i=1 TO 7:READ a,b DUA 
12118 DRAW a,b:NEXT )ND 
12128 DATA 279, 48,318, 142,318,184, 222, 294, 222,326, 318,3 >HA 
54, 318, 398 

12138 ORIGIN 272,5:FILL S:0RIGIN 8,8 )DA 
12148 RETURN JA 
12158 )DE 
12168 ’  TABLEAU 12 >DF 
12178 ' )DG 
12188 PAPER#3,2:CLS#3:GOSUB 15889:GRAPHICS PEN $ >RY 
12198 PLOT 318,8:RESTORE 12229 »XE 
12298 FOR i=1 TO 19:READ a,b >UB 
12218 DRAW a,b:NEXT NE 
12228 DATA 318, 58,119, 172,34, 296, 82, 384, 368, 384, 559,318 >NQ 
, 559, 252,488, 252, 468, 188,648, 148 

12238 PLOT 376,9:RESTORE 12268 »YB 
12248 FOR i=1 TO 8:READ a,b >UG 
12258 DRAW a,b:NEXT JNJ 
12268 DATA 378,149,296,176, 148,288, 178, 336,382, 318,449, DUN 
268,442,159,649,88 

12278 ORIGIN 69,296:FILL S:DRIGIN 9,8 DD 
12288 RETURN MF 
12298 >DK 
12399 '  TABLEAU 13 >DB 
12318 ' >DC 
12328 PAPER43,2:CLS#3:GOSUB 15989:GRAPHICS PEN # >RU 
12338 PLOT 9,148:RESTORE 12368 >XG 











12348 FOR i=1 TO 12:READ a,b >UJ 
12358 DRAW a,b:NEXT >NK 
12368 DATA 49, 148,99, 226, 392, 376, 488, 372,578,258,514,18 >GN 
9,442,1179,422,159,522,68, 472,22, 388, 16, 376,9 


12378 PLOT 9,88:RESTORE 12499 »XA 
12388 FOR i=1 TO 11:READ a,b JUN 
12398 DRAW a, b:NEXT NP 


12498 DATA 158,88, 326, 388, 436, 324, 499, 282, 466,244, 376,2 DWY 
18, 338, 136, 426, 74,496,69,276,54,272,8 


12418 ORIGIN 4,129:FILL S:ORIGIN 8,8 )CA 
12428 RETURN >HB 
12435 )DF 
12449 *  TABLEAU 29 >DG 
12458 >DH 
12468 PAPER#3, 2:CLS#3:GOSUB 15#89:GRAPHICS PEN $ >RZ 
12478 PLOT 376,4YD:RESTORE 12599 )ZU 
12488 FOR i=1 TO 16:READ a,b >UU 
12498 DRAV a,b:NEXT )NQ 


12598 DATA 376, 369,359, 334, 309, 396, 92, 396, 78, 208, 138,17 DXJ 
5,138,98,256, 196,298, 148,326, 272, 364, 389, 412, 380,529, 27 
8,512,194,568, 129,649, 114 


12518 PLOT 272, 498:RESTORE 12549 > 2H 
12528 FOR i=1 TO 14:READ a,b DUL 
12538 DRAV a,b:NEXT >NK 
12548 DATA 272,356, 49, 346,36, 156,94, 149, 96, 42, 298, 32,36 DFY 
6,98, 398, 188, 394, 249, 472,244, 456, 148,519, 124,548, 52,649 

,52 

12558 ORIGIN 48,174:FILL 9:0RIGIN 9,9 >DF 
12568 RETURN >MG 
12578 ! DEA 
12588 *  TABLEAU 21 )EB 
12598 ! )EC 
12698 PAPER#3,2:CLS#3:GO0SUB 15898:GRAPHICS PEN 9 >RY 
12618 PLOT 9,114:RESTORE 12648 YXB 
12628 FOR i=1 TO 14:READ a,b >UM 
12638 DRAV a,b:NEXT NL 
12648 DATA 98,114, 198, 148,284, 192, 192, 234, 188, 374, 318,3 DMC 
46,349, 324,552, 278,514, 164, 422, 164, 499, 124,522, 99,518, 4 
2,478,8 

12658 PLOT 9,52:RESTORE 12689 »XC 
12668 FOR i=1 TO 13:READ a,b >UQ 
12678 DRAV a,b:NEXT >NQ 
12688 DATA 194,52,136,36, 254, 36, 282, 249, 299, 252, 232, 298 DUB 
,482, 262, 472, 288, 366, 219,358, 198, 456,66, 456, 49, 344,8 

12698 ORIGIN 26,68:FILL 9:0RIGIN 9,8 >DU 
12788 RETURN DMC 
12718 ? >DG 
12728 ‘  TABLEAU 28 >DH 
12738 >DJ 
12748 PAPER#3,2:CLS+3:GOSUB 15998:GRAPHICS PEN 9 >RA 
12758 PLOT 478,498 :RESTORE 12788 »2J 
12768 FOR i=1 T0 9:READ a,b >UQ 
12778 DRAW a,b:NEXT >NR 
12788 DATA 428, 348, 362, 332, 398, 384, 276, 254,234, 238,238, )CE 
176, 284, 148, 316, 119, 396,8 

12798 PLOT 344, 4/B:RESTORE 12829 >22 
12898 FOR i=1 TO 6:READ a,b >UG 
12818 DRAW a,b:NEXT NL 


12828 DATA 328, 369, 242, 332, 194, 264, 192, 164, 269,188,264, >XA 
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12838 ORIGIN 212,166:FILL #:0RIGIN 8,9 )EH 
12848 RETURN >MH 
12858 )EB 
12868 *  TABLEAU 35 )EC 
12878 ‘ )ED 
12889 PAPER#3, 2:CLS#3:GOSUB 15989:GRAPHICS PEN $ RF 
12898 PLOT 386, 49D:RESTORE 12929 »22 
12988 FOR i=1 TO 13:READ a,b >UX 
12918 DRAN a,b:NEXT NH 


12928 DATA 318,379, 488, 398, 476, 274,444,238,488,229,584, >2N 
156,566, 28,366, 18,328, 84,272, 152, 226, 296, 138,284, 8, 132 


12938 PLOT 264, 49G:RESTORE 12968 »2B 
12948 FOR i=1 TO 11:READ a,b JUP 
12958 DRAW a,b:NEXT NR 


12968 DATA 279,344, 412,296, 398,216, 456, 168,526, 138,548, >2Y 
74,469, 78,296, 199, 254,258, 118,244,9, 198 


12978 ORIGIN 28,188:FILL S:ORIGIN 9,9 )DY 
12988 RETURN NC 
12998 " )EG 
13998 ’ TABLEAU 34 >CK 
13818 ' >DA 
13828 PAPER#3,2:CLS#3:GOSUB 15989:GRAPHICS PEN 8 »RR 
13938 PLOT 649,132:RESTORE 13869 )2]J 
13848 FOR i=1 TO 7:READ a,b DUE 
13958 DRAN a, b:NEXT NH 


13968 DATA 496,114, 324, 226, 136, 262, 84,216, 89,169,257,18 >DC 
5,294,8 


13978 PLOT 649,198:RESTORE 13199 >ZN 
13888 FOR i=1 TO 6:READ a,b >UR 
13998 DRAN a,b:NEXT YNN 
13198 DATA 516,298, 164, 322,66, 389, 18, 138,298,68,226,9 DUR 
13118 ORIGIN 32,144:FILL 9:DRIGIN #,8 >DX 
13129 RETURN >LK 
13138 " )DD 
13149 ? TABLEAU 41 DE 
13158 ' >DF 
13168 PAPER#3,2:CLS#3:GOSUB 15989:GRAPHICS PEN $ RX 
13178 PLOT 294, 4YH:RESTORE 13298 >2ZN 
13188 FOR i=1 TO 7:READ a,b >UK 
13198 DRAW a,b:NEXT NN 


13299 DATA 372,322, 322,246, 289, 136, 178, 119, 166,82, 399,9 >GY 
2,648, 138 


13218 PLOT 226, 499:RESTORE 13249 »2G 
13228 FOR i=1 TO 7:READ a,b UE 
13238 DRAW a,b:NEXT NH 


13249 DATA 392,302,272, 239,234, 178, 196, 146, 86,36, 492,28 DZ 
, 648,98 


13258 ORIGIN 126,138:FILL B:ORIGIN 8,8 )EH 
13268 RETURN ME 
13278 ' )DJ 
13288 * TABLEAU 42 >DK 
13298 ' . )EA 
13398 PAPER#3,2:CLS#3:GOSUB 15988:GRAPHICS PEN 9 RT 
13318 PLOT 9,138:RESTORE 13348 »XD 
13328 FOR i=1 TO 19:READ a,b ; DUF 
13338 DRAN a,b:NEXT JN] 


13349 DATA 88,138,294,298,164,282,232,379,476,378,622,2 NB 
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72,536, 192,484, 199,398, 194,578,9 

13358 PLOT 9,9B:RESTORE 13388 

13368 FOR i=1 TO 11:READ a,b 

13378 DRAW a, b:NEXT 

13388 DATA 36,98,69, 18,212, 28,278,249, 259,299, 394, 334,4 
68,314,529,278,318,116,356,62, 468,8 

13398 ORIGIN 8,122:FILL 8:ORIGIN 6,8 

13498 RETURN 

13418 " 

13428 TABLEAU 49 

13438 

13449 PAPER#3,2:CLS#3:G0OSUB 15888:GRAPHICS PEN 9 

13458 PLOT 578, 499:RESTORE 13489 

13468 FOR i=1 TO 8:READ a,b 

13478 DRAN a,b:NEXT 

13488 DATA 518,274,518, 222,562, 182,538, 89, 334,64, 296,28 
6,126,239, 9, 162 

13498 PLOT 468, 499:RESTORE 13529 

13598 FOR i=i TO 19:READ a,b 

13518 DRAN a, b:NEXT 

13528 DATA 426, 359,426, 258, 478,246, 478,182,514,176,514, 
136,498, 136,316, 274,86,282, 8,214 

13538 ORIGIN 4,176:FILL Z:0RIGIN 9,9 

13548 RETURN 

13558 ? 

13568 "  TABLEAU 48 

13578 

13588 PAPER#3,2:CLS#3:GOSUB 15998:GRAPHICS PEN 8 

13598 PLOT 649,162:RESTORE 13629 

13698 FOR i=1 TO 9:READ a,b 

13619 DRAW a,b:NEXT 

13628 DATA 592, 162,526, 128, 448, 128, 496, 234,316, 234, 194, 
96, 88,84, 32, 172,9, 172 

13638 PLOT 649,214:RESTORE 13669 

13649 FOR i=1 TO 7:READ a,b 

13658 DRAW a,b:NEXT 

13669 DATA 592,214,442, 284, 392, 284, 174,149, 126, 149, 79,2 
42,9,242 

13678 ORIGIN 8,296:FILL B:ORIGIN 9,8 

13688 RETURN 

13698 ? 

13798 ’  TABLEAU 47 

13718 ' 

13728 PAPER#3,2:CLS#3:GOSUB 15999 :GRAPHICS PEN 8 

193738 PLOT 649,172:RESTORE 13769 

13748 FOR i=1 TO 9:READ a,b 

13758 DRAN a,b:NEXT 

13769 DATA 614, 174,588, 154,596, 184, 446,268, 426,266, 372, 
282,162,288, 142, 236, 82, 489 

13778 PLOT 649,242:RESTORE 13899 

13788 FOR i=1 TO 5:READ a,b 

13798 DRAW a,b:NEXT 

13898 DATA 414,316, 362, 259, 226,268, 292, 342, 149, 498 
13818 ORIGIN 196,382:FILL S:ORIGIN 9,8 

13828 RETURN 

13838 

13848 ’  TABLEAU 48 

13858 ? 

13868 PAPER#3,2:CLS+3:GOSUB 15998 :GRAPHICS PEN 8 


)XA 
JUL 
NN 
)TJ 


)DG 
>MA 
DE 
)DF 
)DG 
>RY 
>2F 
>UX 
>NP 
>PV 


)2C 
UF 
N] 
>NR 


>DH 
MF 
DK 
)EA 
)EB 
RD 
»2B 
)UJ 
JNK 
>XZ 


)1Y 
JUL 
NP 
)EA 


EN 


»ZA 
)UP 
>NV 
)QP 
)EJ 
HG 
DEA 
)EB 
>EC 
RE 


13878 PLOT 82,9:RESTORE 13998 
13888 FOR i=1 TO 5:READ a,b 

13898 DRAV a,b:NEXT 

13948 DATA 112,114, 318,242, 264, 282, 149, 294,9, 169 
13918 PLOT 159, D:RESTORE 13949 

13028 FOR i=1 T0 5:READ a,b 

13938 DRAW a,b:NEXT 

13948 DATA 186,36, 448, 318, 382, 348, 212, 338,8, 222 
13958 ORIGIN 8,192:FILL :0RIGIN 8,9 

13968 RETURN 

13979 
13088 ‘ 
13998 ? 
14998 PAPER#3,2:CLS43:GOSUB 15498:GRAPHICS PEN 9 
14918 PLOT 648, 169:RESTORE 14948 

14928 FOR i=1 T0 S:READ a,b 

14938 DRAV a,b:NEXT 

14948 DATA 584,168, 584,52, 58, 52, 49, 162, 9, 156 
14958 PLOT 19, 328:RESTORE 14989 

14068 FOR i=1 TO 4:READ a,b 

14978 DRAV a, b:NEXT 

L498B DATA 224,338, 268, 164, 118, 122, 199, 328 

14998 PLOT 649, 222:RESTORE 14129 

14198 FOR ic1 TO S:READ ab 

14118 DRAW a, b:NEXT 

14128 DATA 578,222,576, 362, 64, 362, 42,232, 8, 232 
14138 PLOT 412, 264:RESTORE 14169 

14148 FOR i=1 T0 S:READ a,b 

14158 DRAN a, b:NEXT 

14168 DATA 516,242, 532, 86, 344, 78, 338, 286, 412, 264 
14179 PLOT 236, 192:RESTORE 14298 

14188 FOR i=1 TO S:READ a,b 

14198 DRAW a, b:NEXT 

14288 DATA 294,198, 284, 72, 166, 78, 194, 198, 236, 192 
14218 PLOT 464, 334:RESTORE 14249 

14228 FOR i=1 TO 4:READ a,b 

14238 DRAV a, b:NEXT 

14248 DATA 536,308, 512, 288, 438, 294, 464, 334 

14258 PLOT 298, 334:RESTORE 14289 

14268 FOR i=1 TO 4:READ a,b 

14278 DRAW a, b:NEXT 

14288 DATA 392, 322, 392, 259, 288, 259, 298, 338 

14298 PLOT 129, 72:RESTORE 14329 

14398 FOR i=1 TO 4:READ a,b 

14318 DRAW a, b:NEXT 

14328 DATA 154,79,154,58, 118,58, 129, 72 

14338 ORIGIN 28,242:FILL #:0RIGIN 8,9 

14348 RETURN 

15998 

15818 FOND 

15928 

15938 TAGOFF:PEN4S, 3 

15949 LOCATE#3, 2, 3:PRINTH3, bart 

15858 LOCATEN3, 5, 22:PRINT#3, brigt 

15968 LOCATER3,6, S:PRINT43, brig$ 

15978 LOCATENS,6, 16:PRINT#3, bout 

15988 LOCATER3, 7,6:PRINTH3, brig$ 

15098 LOCATEN3, 7, 12:PRINT#3, brigt 

15198 LOCATERS, 7, 22:PRINTE3, bri gt 


TABLEAU 39 











15118 LOCATEN3,8,5:PRINTHS, briq$ 
15128 LOCATE#3, 8, 11:PRINTH#3, briq$ 
15138 LOCATEN3,8,23:PRINT#3,briqf 
15148 LOCATE#3, 13, 18:PRINT#3, brig$ 
15158 LOCATENS, 14, 17:PRINTH3, brig$ 
15168 LOCATE#3, 15, 18:PRINTH#3, briq$ 
15178 LOCATENS, 17, 3:PRINT#3,briqf 
15188 LOCATE#3, 19, 19:PRINTE3, briq$ 
15198 LOCATENS3, 29, 11:PRINTR3, briq$ 
15295 LOCATE#3, 21, 16:PRINT#3, poign$ 
15218 LOCATEH3, 22,24: PRINTA3, squep$ 
15229 LOCATE#3, 24,8:PRINT#3,clef$ 
15238 LOCATENS, 39, 13:PRINTH#3, poif 
15248 LOCATE#3, 28, 19:PRINT#3, brig$ 
15258 LOCATEN3,29,5:PRINT#3,briqf 
15268 LOCATE#3, 29, 18:PRINT#3, briq$ 
15278 LOCATENS, 31, 4:PRINT#3,briqf 
15288 LOCATE#3, 33, 4:PRINT#3, briq$ 
15298 LOCATEHS, 36, 13:PRINTH3, br iq$ 
15398 LOCATE#3, 36,22:PRINT#3, encp$ 
15318 LOCATENS, 1, 14:PRINT#3,briqf 
15328 LOCATE#3, 39, 4:PRINT#3, bri q$ 
15338 TAG:RETURN 


MON 1 


19 NOUVEAUX SYMBOLES 

15 SYMBOL AFTER 298 

28 SYMBOL 299,22, 22, 28,49,59,54,231,119 

38 SYMBOL 218,3,6,14,14,14,39, 252,252 

48 SYMBOL 211,35,37, 153,66, 68, 232, 231, 248 

54 SYMBOL 212, 4,19, 18, 18,36, 36, 195,31 

68 SYMBOL 213,16,16,24,28,29,21,21,23 

78 SYMBOL 214,28,56, 112,249, 224,169, 169,169 
88 SYMBOL 215,16,48, 48,89, 89, 299, 163,163 

98 SYMBOL 216,2,2,6,6,6, 14, 14,39 

198 SYMBOL 217,9,9,8,9,16,9,9,9 

119 SYMBOL 218,8,162,8,16,8,9,8 

128 SYNBOL 219,24,52, 62,56, 48,96, 86, 198 

139 SYMBOL 229,88, 72, 72,48, 48,48, 48,69 

149 SYMBOL 221,9,49,219,58, 254, 55, 3,3 

158 SYMBOL 222,8, 149, 219,92, 127, 236, 192, 192 
168 SYMHBOL 223,191, 198, 188, 184, 184, 176, 168,8 
179 SYMBOL 224,253, 125,61,29,29,13,5,8 

189 SYMBOL 225,255,255,255, 255, 255, 248, 224, 128 
198 SYMBOL 226,254, 254,254, 254,254, 38,6,1 
298 SYMBOL 227,127,124,127,124,127,124,127,9 
219 SYMBOL 2286, 223, 228, 223, 228, 223, 229, 223,9 
229 SYMBOL 229, 246,63, 247,43, 247,63,247,42 
239 SYMBOL 238,246,63,247,43,247,63,54,54 
248 SYMBOL 231,239, 239, 239, 239, 239, 239, 239, 
259 SYMBOL 232,254, 254,254, 254,254, 254, 254,8 
269 SYMBOL 233,192, 179,85, 179,85, 178,85, 152 
279 SYMBOL 234,153, 153,219, 126, 126,69, 24, 24 
288 SYMBOL 235,8, 24,24,24, 24,16, 24,24 

285 vie=3 


)BT 
>BD 
>BH 
>CP 
)CQ 
>CU 
>CB 
CR 
)CK 
)DY 
)EJ 
>BH 
>BD 
>CY 
CF 
>CA 
>BH 
CC 
>C4 
>CD 
)BA 
>CD 
HU 


?LA 
NA 
)EQ 
)CC 
GE 
)CY 
)CR 
)JC 
>FG 
YN 
XV 
XL 
>EV 
)EA 
CB 
)JN 
KU 
>DH 
NT 
>GH 
KR 
NE 
HA 
>GP 
XKF 
KK 
JT 
)JL 
CI 
)JA 


298 x=6:y=16:x2-=29:y2=14:x1=8:yl=Q:tir=289:vie2=19:coul >VK 
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=1:sou=0:w=f 


399 MODE B:BORDER B:1NK 8,B:INK 1,13:INK 2,6,8:INK 3,6, )CH 

25: INK 4,15:INK 5,14: INK 6,1:INK 7,3:INK 8,26: INK 9,9:1 

NK 1B,19:INK 14,7 

395 FOR i:1 TO 11 >CB 

319 PEN 1:LOCATE 1,i:PRINT STRINGS (28,231) :LOCATE 1,i+1 DXJ 
:PEN {:PRINT STRINGS(29,232):i=i#1 

315 NEXT i >NH 

329 LOCATE 1,12:PEN 1:PRINT STRINGS(B, 232)+CHR$(225)4CH DEA 

R$(226)+STRINGS (8, 232) 

339 LOCATE 1,13:PEN 1:PRINT STRING#(7,231)+CHR$(223)#"  DKC 
"+CHR$(224)+STRINGS (9, 231) 

349 goul$=CHR$(221)+CHR$ (222) :LOCATE 9, 13:PEN 1:PRINT g DEV 

oul$ 

359 PEN 4:LOCATE 1,18:PRINT STRING# (29, 233) >LH 

369 hont-CHR$ (219) +CHR$(8)+CHR$(19)+CHR$ (228) >MB 


379 f13$=" "+CHR$(216)+" 
$+f13$+F13$+f13$+f13$: 

389 f12$=CHR$(213)+CHR$(214)+CHR$(215)+" ":PEN 3:LOCATE 
1,23:PRINT f12$+f12$+f12$+f12$+f12$: 

399 f11$=CHR$ (289) +CHR$(218)+CHR$(211)+CHR$ (212) :PEN 3: 

LOCATE 1,24:PRINT f11$+f11$+f116+f116+f11$: 

489 LOCATE 1,22:PEN 2:PRINT CHR$(217) :LOCATE 3,22:PEN 2 DWB 
:PRINT CHR$ (218): 

419 LOCATE 5,22:PEN 2:PRINT CHR$(217):LOCATE 7,22:PEN 2 DWL 
:PRINT CHR$(218): 

428 LOCATE 9,22:PEN 2:PRINT CHR$(217) :LOCATE 11,22:PEN 

2:PRINT CHR$(218): 

439 LOCATE 13,22:PEN 2:PRINT CHR$(217):LOCATE 15,22:PEN YA 
2:PRINT CHR$(218): 

449 LOCATE 17,22:PEN 2:PRINT CHR$(217):LOCATE 19,22:PEN DYK 
2:PRINT CHR$(218): 


":LOCATE 1,22:PEN 3:PRINT f13 BC 


LA 


1Y 


JL 


»XG 


459 LOCATE 3,19:PEN 4:PRINT CHR$(234)+#"  "4CHR$(234)+ DQE 
M MACHRS(234)+"  "+CHRS(234) : 

469 LOCATE 3,28:PEN 4:PRINT CHR$(235)+"  "+CHR$(235)+ )QB 
M M4CHRS(235)+"  #4+CHR$S(235): 

#79 LOCATE 3,21:PEN 4:PRINT CHR$(235)+"  "+CHR$(235)+ )QD 
M MACHRS(235)+"  "+CHRS(235): 

489 LOCATE 3,22:PEN 4:PRINT CHR$(235)+"  "+CHR$(235)+ )TA 
" "+CHR$S(235): 

499 LOCATE 8,23:PEN 4:PRINT CHR$(235) : )FV 
598 LOCATE 1,14:PEN 1:PRINT CHR$(227): >FB 
519 LOCATE 1,15:PEN 1:PRINT CHR$(228): )FE 
528 LOCATE 1,16:PEN 1:PRINT CHR$(227): >FF 
539 LOCATE 1,17:PEN 1:PRINT CHR$ (228): )FJ 
558 mon$=CHR$(229)+CHR$(8)+CHR$(19)+CHR$(229)+CHR$(B)+C >LJ 
HR$(19)+CHR$(229)+CHR$ (8)+CHR$(18)+CHR$ (239) 

579 GRAPHICS PEN 4:PLOT 239,31:PLOT 249,31:PLOT 239,38: >MF 
PLOT 239,29 

589 GRAPHICS PEN 4:PLOT 498,47:PLOT 499,45 )J 
598 GRAPHICS PEN 4:PLOT 89,47:PLOT 89,45:PLOT 89,43:PLO >DG 
T 88,41:PLOT 88,39:PLOT 89,37:PLOT 79,35:PLOT 88, 35:PLO 

T 79,33:PLOT 89,33:PLOT 79,31:PLOT 84,31:PLOT 79,29:PLO 

T 89,29 

689 GRAPHICS PEN 4:PLOT 559,62:PLOT 568,62:PLOT 559,69: DUE 


PLOT 569,69:PLOT 559,58:PLOT 568,58:PLOT 559,56:PLOT 56 
8,56:PLOT 559,54:PLOT 568,54:PLOT 559,52:PLOT 559,59:PL 
OT 559,48:PLOT 569,49:PLOT 569,38:PLOT 564,42:PLOT 559, 
38:PLOT 559, 36 
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619 PLOT 569,36:PLOT 559,34:PLOT 568,34:PLOT 559,32:PLO )ZN 
T 569,32:PLOT 559,39:PLOT 569,38:PLOT 559,28:PLOT 569,2 
8:PLOT 559,26:PLOT 559,24:PLOT 559,22:PLOT 559, 29 


988 LOCATE x,y:PEN 5:PRINT hon$ »AG 
919 LOCATE x2,y2:PEN 1:PRINT son$ )BB 
938 blanc$=CHR$(32)+CHR$(8)+CHR$ (18) +CHR$ (32) >MD 


948 blanc2$=CHR$(32)+CHR$(8)+CHR$(18)+CHR$(32)+CHR$(8)+ KL 
CHR$(18)+CHR$(32)+CHR$ (8) +CHR$ (18) +CHR$ (32) 


1898 »XD 
1918 * PROGRAMME PRINCIPALE JXE 
1829 >XF 
1939 tir=tir+1 >AH 


1948 1F JOY(#)=4 THEN LOCATE x,y:PRINT blancé:x=x-1:1F >22 
xC={ THEN GOTO 19999 ELSE LOCATE x,y:PEN 5:PRINT hon$ 

1859 IF J0Y(#)=8 THEN LOCATE x,y:PRINT blanc$:x=xti:[F >BU 
x>=x2 THEN GOTO 19999 ELSE LOCATE x,y:PEN 5:PRINT hon$ 

1868 1F JOY(#)=16 AND tir>=59 THEN GOTO 29998:G0T0 1878 >XM 


1979 GOSUB 39989:1F mou={ THEN LOCATE x2,y2:PRINT blanc >CQ 
2$:x2=x2-1:1F x2=x THEN GOTO 19989 ELSE LOCATE x2,y2:PE 
N 1:PRINT non$:SOUND 2,499,15,15,9,9,39 


1888 GOTO 1988 >LH 
19969 >CG 
19918  VIE-1 >CH 
19928 >CJ 
19938 vie=vie-1 )EK 
19948 1F vie=# THEN GOTO 19959 ELSE GOTO 299 »JP 
19958 MODE 1:PEN 1:LOCATE 8,18:PRINT" Vous etiez si pret DYF 
du but..." 
18969 FOR i=1 TO 3B99:NEXT:CALL 8 )22 
295998 >CH 
28918 TIR )CJ 
29828 >CK 
28925 IF tir<5ÿ THEN GOTO 1978 ELSE GOTO 29939 >LN 
29836 xi=x#32:x12=(x2-1)#32:y1=146 CV 


28948 GRAPHICS PEN 8:PLOT xl,yl:DRAM x12,y1:SOUND 1,59, >ZB 
17,15,1,1,18:GRAPHICS PEN 9:PLOT xl,yl:DRAW x12,yl 

28958 IF coul=12 THEN tir=8:G0T0 1979 DD 
29969 IF coul=3 THEN FOR i=ÿ TO 7:SOUND 1,8,15,15,9,9,i >VX 
#3:NEXT:GOTO 19899 

28978 IF coul=13 THEN LOCATE x2,y2:PEN 14:PRINT mon$:F0 >PQ 
R i=1 TO 5#:NEXT:LOCATE x2,y2:PEN 1:PRINT aon$ 


29988 vie2=vie2-1 )MJ 
28998 IF vie2-8 THEN MODE 1:GO0T0 28118 »DC 
28188 IF vie2)$ THEN GOTO 1978 JW] 
29119 PEN 1:LOCATE 3,12:PRINT"Le gardien est mort est v >PF 
ous entrez dans ce fabuleux monde :BRAVO !!!" 

29128 FOR i=1 TO 3889:NEXT :CLS:END >CH 
38998 )CJ 
38919 *  CHANGEMENTS >CK 
38928 )DA 
38925 w=u+1:1F w>25 THEN w=ÿ >VA 
38938 r=r+1:1F r<15 THEN mou=8 »XQ 
38948 IF r=15 THEN aou=1:r=f NE 
38958 IF w)=ÿ AND w<=19 THEN coul=12 >CB 
38969 IF w>=11 AND u<=28 THEN coul=3 CB 
39978 IF w>=21 AND w<=25 THEN coul=13 )CC 
39138 INK 13, coul :LOCATE 9,13:PEN 13:PRINT goul$ >RZ 
39148 RETURN >MA 
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ne Rey fe 


O.G.TL.I. 






O.G.T.I. est un utilitaire 
de graphisme, 


entièrement programmé 
en assembleur. 
e sigle signifie “Outils Graphi- 
L ques de Traltement d'Images”. 
ll ne s'agit pas de concurren- 
cer des logiciels de graphismes tels 
que OCP Art Studio. 


Au contraire, c'est un complément. 
Ce sont des outils qui n'existent pas 
où qui apportent Un «plus» à l'utili- 
sateur. 


OUTILS 


TRAITEMENTS : 

L'O.GTI. est compatible avec le 
6128, le 664 et le 464 avec un lecteur 
de disquette. |l est utilisable dans les 
trois modes. Les traitements d'ima- 
ges sont très rapides, en quelques 
secondes. Et ils peuvent traiter des 
images automatiquement en série 
ou une à une. Seul, REPARER-STRIES 
se fait en manuel. 


Les Images que vous avez récupé- 
rées avec des numériseurs vidéo ou 
des scanners ne sont pas toujours 
nettes. Vous pouvez éliminer des 
points isolés à cause de signaux pa- 
rasites où autres. 


Vous pouvez aussi replacer des 
images décalées horizontalement à 


Kuy Lim THONG 


Valable pour CPC 464 - 664 - 6128 


cause d'un blocage de la tête de 
saisie sur l'imprimante, par exemple. 


Il vous est possible aussi de créer les 
contours des Images ou de réduire 
celles-ci à la taille de 1/4, 1/16, 1/ 
32, etc. 


Dans ce cas. Il faut vérifier la qualité 
qui se dégrade au fur et à mesure 
des réductions. 


Les outils sont là, c'est à l'artiste de 
trouver l'inspiration. 


MELANGES D'IMAGES : 

Les mélanges d'images peuvent se 
faire de plusieurs manières: AND, OR 
ou XOR. Vous obtenez en binaire: 
0010 = 1010 AND 0110, 1110 = 1010 
OR 0110, 1100 = 1010 XOR 0110, 


Autrement dit, vous pouvez obtenir 
des résultats étonnants selon les 
modes et les résolutions d'écrans. 


De plus, avec XOR. Il est possible de 
vérifier si deux Images sont identi- 
ques, lorsqu'aucun pixel n'est plus 
à l'écran. 


TRANSFERT : 

Si un décompacteur est Intégré 
dans le fichier compacté, et si un 
simple appel à une adresse suffit à 
décompacter, alors vous pouvez 
Installer cette adresse avec l'option 
“Transfert”. Ensuite, Il est possible de 
charger des fichiers compactés ou 
les transférer en fichiers standards 
de 17 KO automatiquement. 
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Le décompacteur à Installer doit 
être entre (&3000-3FFF) ou (&A100- 
&A67B). 


L'Inverse est plus difficile, car Il exis- 
te beaucoup de manières de com- 
pacter et des positions différentes 
des adresses. 


ERGONOMIE 
DU PROGRAMME 


MENUS DEROULANTS : 

C'est une structure de menus dé- 
roulants que vous pouvez déplacer 
avec des flèches, choisir avec la 
BARRE-ESPACE si nécessaire, valider 
avec ENTER où RETURN, et annuler 
ou quitter avec ESC. Ce sont les 
principales touches à utiliser dans 
tous les programmes. 


Dans le menu principal, ESC permet 
de voir l'image gardée en mémoi- 
re. Appuyer une fois de plus permet 
le retour au menu principal. Même 
principe pour les sous-menus. 


PARAMETRES : 

Vous pouvez fixer des paramètres: 
Dans AUTO : automatique ou mar- 
nuel pour les traitements. Dans FI- 
CHIER: source et destination des 
lecteurs si vous en possédez deux: 
l'extension standard est .SCR et cel- 
le du compact est .PAC, mails vous 
pouvez adapter l'extension aux fi- 
chliers compactés. Si les fichiers 
standards ne sont pas en .SCR, Il est 
possible de les renommer. Dans 


MODE: 0,1,2. Dans CONSULTER: 
source et destination sont identiques 
à celles qui se trouvent dans FI- 
CHIER. Dans MELANGER: and, or, 
xor. Dans TRANSFERT: adresse de 
décompactage. 


FICHIER : 

Charger, fusionner, sauver, effacer 
et renommer se font sans écrire le 
nom du fichier. Ils se font par sélec- 
tion en plaçant un curseur dessus, 
en choisissant le nom avec BARRE- 
ESPACE et en valldant avec ENTER. 


Vous pouvez sauver sous le même 
nom de fichier en tapant COPY, et 
modifier éventuellement celui-ci. 
Toutes les corrections de caractè- 
res se font sous la fonction de l'édi- 
teur du BASIC. 


FUSIONNER permet de mélanger 
deux Images dont vous avez, au 
préalable, choisi le mode dans ME- 





LANGER. Et BARRE-ESPACE permet 
de revenir à l'état précédent en 
mode XOR: vous validez avec EN- 
TER où annuler avec ESC. 


CONSULTER: 

Vous pouvez obtenir le catalogue 
de la disquette en entier avec le 
nombre de KO pour chaque fichier. 


Ou, vous pouvez obtenir le catalo- 
gue avec DIR pour consulter une 
partie de la disquette, selon les 
conditions du Joker. 


Vous pouvez aussi voir défiler une à 
une des Images de la disquette, et 
revenir à l'image précédente, en 
utilisant la flèche-gauche et la flè- 
che-droite. 


Ce programme apporte un com- 
plément aux logiciels de graphisme 
et Il est facile d'utilisation avec dses 
menus et son automatisation. Il est 


plus facile de l'utiliser en manuel, si 
I n'y a qu'un seul lecteur. Son ergo- 
nomle est augmentée et sa présen- 
tation et son cadrage sont simpli- 
fiés. C'est aussi un pas en avant 
pour l'utilisateur qui se tourne vers la 
gestion des Images. 


Il aura des améliorations futures et 
des outils qui viendront augmenter 
ses fonctions. 


INSTALLATION 

DU PROGRAMME : 

Ce programme est coupé en deux 
parties, sous forme de datas, OGTI1 
et OGTIZ.BAS. Exécutez ces deux 
parties et vous obtenez deux fichiers 
binaires, OGTIT.BIN et OGTIZ.BIN. 


Ensuite, lancez OGTI3.BAS qui ras- 
semble les deux précédents et sau- 
ve sous Un fichier binaire OGTIBIN 
exécutable par RUN»OGTIBIN» di- 
rectement. 


GESTION BANCAIRE 6128 


LA GESTION DE COMPTE BANCAIRE INDISPENSABLE POUR VOTRE CPC 


RELEVES 
Quelques caractéristiques : 


- Gère jusqu'à 10 comptes (banque, épargne, caisse...). 

- Codes secrets possibles pour chacun des comptes. 

- Saisie des opérations très simple, avec aide en ligne. 

- Fonction archivage, vous permettant de stocker année par année 
vos opérations, 


DATE TYPE No ORDRE/OBJET DEBIT CREDIT SOLDE 
- Fonction TRIER, pour obtenir des listes d'opérations par dates 
croissantes. 


RUE gg 
je À in s6, ‘ 
- À l'aide de POINTER, vous pouvez effectuer la liaison avec votre 


4 Eu HARMAC 1! DAT 
Lis 
jÿ 
14 
relevé de banque ’officiel'. LA 


SELECTION MODIFIER 


SUPPORT/SORTIE CRITERE 


SUPPORT / SORTIE 


| 


LETT 


1e m HE 


de Ch 
/06/ 
/ 


DD Du 
SSSSSS 


x xxxx 


a) |: al 





EXDOURS 


i VS BON DE COMMANDE à retourner à 
- Recherche particulière répondant à 1 ou plusieurs critères! MICROLOGIC - B.P. 18 - 91211 DRAVEIL CEDEX 
parmi les suivants : -DATES DE DEBUT ET DE FIN . par téléphone:(1) 69.21.61.65 / par minitel (1) 69.24.49.08 
-MONTANTS MINIMUM ET MAXIMUM : 


-UN LIBELLE PARTICULIER Noms Len nt et Prénom: 
- Liste de chèques pouvant répondre aux critères suivants: | Adresse | 
-DATES DE DEBUT ET DE FIN : Code postal: Vale Loan nee Lt 


-NUMEROS DE DEBUT ET DE FIN. ‘Je commande GESTION BANCAIRE 6128 , au prix 
- Relevé complet -ENTRE DATES de 265,00 Frs. (port compris) 


“AFFICHAGE SOLDE REEL OU SOLDE :[lje désire recevoir votre CATALOGUE GRATUIT 
OPERATIONS POINTEES. : présentant votre autres produits pour CPC. 


- Sorties sur ECRAN , IMPRIMANTE ou DISQUETTE. \ Je choisis de régler par :_ Expire 
- UTILITAIRES IMPRIMANTE, ECRAN, COPIE D'ECRAN. | [] CHEQUE CB ES ns Er eue FÎN 
- UTILISE LES 128 Ko DE VOTRE CPC 6128. i [] MANDAT [] CONTRE RBT (435 Frs) 
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OGTIT 


18 "--- premiere partie --- 

28 ? 

38 MEMORY &9899-1:MODE 2:adr=t9998 

49 FOR j=1 TO 247:k=9:FOR i=8 TO 15:READ a$ 

58 POKE adr,VAL("&"+a$):k=k+PEEK(adr):adr=adr+! 

69 NEXT i:READ b$:1F VAL("&"+b$)>k THEN 68 

78 NEXT j:SAVE"ogtii.bin",b,49998, 41998 :CLS:END 

88 CLS:PRINT "ligne : ";jx18+99;" incorrecte" :END 

98 

188 DATA 21,FF,B9,11,49,99,0E, 87, CD, CE, BC, C3, BB, 39,98, 99,639 
119 DATA 89,99,7F,02,91,98,99,08,8E,91,82,08,06,09, 69,09, 113 
129 DATA 86,96, 99, 89, 90,90,09,69,06,92,93,09,98,99,85,09,D95 
138 DATA 99, 99,08, 00,08, 08,99,08,90,06,06,90,66,90, 59,09, 088 
149 DATA 89,89,00, 80,09, 96,09,09,99,09,99,69,98,09,99, 09,999 
158 DATA 86,99,09, 09, 09,99, 60,08 ,96,09,95,08,90,09, 09,86, 099 
169 DATA 89,96,00, 99,09, 09,09,09,08,96,95,09,06,98,09, 09,299 
178 DATA 69, 09,09, 00,08,08,969,08,66,09,98, 09, 90,90, 69,99,609 
189 DATA 8C, 29,29, 29,29, 29,29, 29,28,2E,28,28,28,9C,88,08, 1A6 
199 DATA 69, 99,85,00,99,09,95,08,96,08, 90, 28,28,29, 29,29, GAC 
288 DATA 28, 29,28, 2E, 28, 29, 29,93, 2A,2E,2A,08,08,98,98,99,173 
219 DATA 99, 09,09, 09,05, 2A,2E,53,43,52,95,88,80,80,09,99,145 
229 DATA 89,89,99,C3,5E, BD, C3, 99,08,C3,98,98,C3,69,98,98,427 
238 DATA 98, 93,9F, 96,41,92,9B,9E, 99, 12,13, 15,16, 18, 19, 14, #D8 
249 DATA 99, 89,06, 00,09, 00,06, 00,08,08,08,98,99,98,98,09,599 
258 DATA 89, 09,06, 00,98,00,69,08,90,08,69,09,06,09, 00,09, 058 
268 DATA 21,80,49,81,C8,59,59,E5, 42,5E, CB, B, 1F,9F,CB,9B,529 
278 DATA 1F,9F,CB,9B, 1F,0F,CB,88B,1F,CB,89B, 1F,8F,CB, BB, 1F, 428 
289 DATA 8F,CB,8B,1F,0F,CB,9B,1F,9F,77,23,19,DC,E1,8D,C8,553 
298 DATA CD, 26, BC, 18,D2, 21,88,C9,91,C8,58,59,E5, 42, 7E,9F, 607 
388 DATA 8F,CB,1B,8F,9F,CB, 1B,9F,9F,CB, 1B,9F,8F,CB, 1B,8F,419 
318 DATA CB, 1B,8F,8F,CB,1B,4F,4F,CB, 1B,9F,9F,CB, 1B, 73,23, 488 
328 DATA 19,DC,E1, 8D, C8, CD, 26, BC, 18,D2,21,98,48,91,C8,59,6B5 
338 DATA ES, C5, AF,57,5F,4E, ED,6F,CB,99,CB, 13,CB, 89, CB, 12,81C 
348 DATA 8F,CB,13,8F,CB, 12, CB, 99, CB, 13, CB, 89, CB, 12,8F,CB,616 
358 DATA 13,9F,CB, 12,72, 7B, ED,6F,23,18,D7,C1,E1, 8D, CB, CD, 796 
368 DATA 26,BC,18,CC,21,89,C9,91,C8,59,E5,C5,AF,57,5F, 4E, 71D 
378 DATA ED,6F,8F,CB, 12, CB, 99,CB, 12,9F,CB, 13,CB, 89, CB, 13, 698 
388 DATA 8F,CB,12,CB, 99, CB, 12, 8F, CB, 13, CB, 99, CB, 13, 72, 7B,629 
398 DATA ED, 6F,23, 19,D7,C1,E1,9D, CB, CD, 26, BC, 18, CC, F3, 86, 869 
488 DATA 92, 34,29, 19,87, 28,05, CB, 28, 3D,28,FB, 78,32,1C, 12,474 
419 DATA CD,F5,11,FB,C9,21,98,C8,22,95,12,21,8E,91,8E,C8,637 


BAS 
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429 DATA 11,89, 89, DD, 21, 89, C9, 86, 59,C5, DD, 7E, 88,87, 28, 25,549 
438 DATA FE, FF, 28, 21,ED, 53, 1, 18, 22, 1E, 18,86,68,C5, CD, 7B,61D 
448 DATA 12,24, 1C, 19, ED, 4B, 14, 18,99, 22, 10, 19,C1,18,EE,EB, 4C5 
458 DATA 24, 1E, 18, 18,96,91,96,98,EB, 99, EB, DD, 23,C1, 19, C9, 4F8 
469 DATA BD, CB, 28, 28, EB, 2,85, 12, CD, 26, BC, 22,95, 12,EB, C3, 5ED 
478 DATA 86, 12,98, 00,08,09,90,08,96,08,66,09, 60,99, 80,09, 012 
488 DATA 89,59,CD, F9, BB, FE, 98, 28, 19, 21,52, 12, 96,08, 4F, 9, 491 
498 DATA 34, ED,5B, 97,6, 2A, 99, B6, C9,E1, C9, 6, 19, AF, 21,52, 7ED 
589 DATA 12,77,23,19,FC, ED, 5B, 1C, 19, 2A, 1E, 19,CD, FB,BB, 32,62€ 
519 DATA 66, 12, CD, 71,12,EB, ED, 48, 14, 18, ED, 42, EB, CD, 62, 12, 76A 
529 DATA 28,28, CD, 62, 12,EB, ED, 4B, 14, 19,99, EB, CD, 62, 12, EB,6FE 
538 DATA ED, 4B, 14, 19,99, EB, CD, 62, 12, 23, 23, CD, 62, 12, 23, 23, 55E 
549 DATA CD, 62, 12,EB, ED, 4B, 14, 19,ED, 42, EB, CD, 62, 12, EB, ED, 8BB 
559 DATA 48, 14,19, ED, 42,EB, CD,62, 12,56, 19, AF, 21,52, 12, 4F, 563 
569 DATA 57,BE, 39,82, 7E, 51,23, 9C, 19, F7, TA, CD, DE, BB, ED, 58, 774 
578 DATA 10, 19,24, 1E, 19,C3, EA,BB, CD, DE, 11,CD, 71, 12, CD, 75, 734 
588 DATA 12,89,89,21,C8, 99, 22, ÎE, 19, CD, 33, 13, CD, 96, BB, F3, 4DF 
598 DATA CD, 16,13,FB,18,F6,FE, F8, CA,D5, 13,FE, F1, CA, EC, 13, A57 
689 DATA FE, F2, CA,57,13,FE,F3, CA, 6F, 13,FE, #D, CB, CD, 33, 13,95F 
619 DATA FB, Et, C9, 3€, 91, CD, DE, BB, 3€, 91, CD, 59, BC, CD, 19, BD, 9$E 
628 DATA 11,8,99, 24, 1E, 19, CD, CB, BB, 11, 7F,92, 24, 1E, 18, CD, 468 
638 DATA F6, BB,3E, #9, C3,59, BC, 2A, 19, 18, 22, 1C, 19, ER, 2A, 1E, 592 
648 DATA 19,CD,F9,BB,F5,ED,5B, 1C, 18, 13, 24, 1E, 18, CD, F8, BB, 7D4 
658 DATA CD, DE, BB, ED, 58, 1C, 19, 2A, LE, 18, CD, EA, BB, 24, 12, 19,6F8 
668 DATA ED,5B, 10,19, ED, 52, 28, 3F,EB, 23, 22, 1C, 18, 18,D6, 2A,58E 
678 DATA 12, 19,22, 10, 18,EB, 2A, 1E, 15, CD, FP,BB, F5, ED, 5B, 1,684 
689 DATA 19,24, 1E, 19, CD, F8, BB, CD, DE, BB, ED, 58, 1C, 18, 13, 2A,6F7 
698 DATA 1E, 19, CD, EA, BB, 2A, 18, 18, ED, 58, 1C, 19, ED, 52, 28,47, 5CC 
788 DATA EB, 28,22, 1C, 19, 18,D6,F1, CD,DE, BB, ED, 5B, 1C, 18, 2A, 747 
719 DATA E, 19,C3, EA, BB, CD, 33, 13, 2A, 18, 18, ED, 58, LE, 19, ED, 65€ 
729 DATA 52, 28,86, EB, 23, 23, 22, 1E, 19,C3, 33, 13, CD, 33, 13, 2A, 447 
738 DATA 16,18,ED,5B, 1E, 18, ED, 52, 26,96, EB, 28, 2B, 22, 1E, 19, 49A 
749 DATA C3,33,13, 21,39, 19,54, 5D, 13,36,98,91,4F, 08, ED, B8, 451 
75 DATA 21,09,49, 22,24, 14,26, C8, 22, 28, 14, 21,36, 19, 5D, 54,311 
769 DATA BE, CB, DD, 21,98, 49, FD, 21,09,C8,AF, 32, 2F, 18,06,58,568 
778 DATA C5, DD,46,69,D5, 34, 2F, 19,9F, 78, 1F,57, A6, A9, 4F, 74,644 
789 DATA A6, A2,CB, 27,B1,4F, 78,32, 2F,18, 1F, 38,98, DD,CB, 91,625 
796 DATA 7E, 29,92, CB,C1, 7E, A6, 57, A8, 81, FD, 77,89, 74, A6, 4F, 7DD 
889 DATA Di, 14,81, 12, DD, 23, FD, 23, 23,13, C1, 18, C3, 00, 28, 19,5E6 
819 DATA 24,24, 14,E5,CD, 26, BC, 22,24, 14, ED, 58, 28, 14, 7C,C6, 616 
829 DATA 89,67, 22,28, 14,E1,C3, 22, 14, 2A, 24, 14, ED, 58, 28, 14,585 
838 DATA 91,59,98, ED, B9, C9, 21,98, 49, 22, AE, 14, 26, CA, 22, B2, 5B6 
849 DATA 14,21,39,19,22,FF, 14, 22,31,15,9E, C8, DD, 21,48, 48, 426 
858 DATA FD, 21,98, C9, AF, 32, 2F, 19,96,58, C5, 34, 2F, 19,5F, 46, 4F7 
869 DATA 84,00,56, 99, 2E, 89, AF, CB, 92, 17, CB, 92, 17,BB,67,28,51E 
878 DATA 96, CB,25, CB, 25, 18,98, 7D,B3,CB, 27, CB, 27, B4,6F,5C, 609 





889 DATA 19,E4,C1,C5,95, 28, 9D, DD, 56,91, AF,CB,92,17,CB, 92,648 

898 DATA 17,BB,28,93,7D,B3,6F,7B,32,2F, 18, FD, 75,89,21,89,51B 

989 DATA 89,5E,23,22,FF,14,DD,56,99,96,94,21,98,0B,AF,4F, 412 

919 DATA CB,82,17,CB,82,17,CB,93,CB, 11,CB, 83, CB, 11,CB, 24, 89B 

928 DATA CB,24,CB,25,CB, 25,B9, 28,95,B4,67, 79,B5,6F, 18, DE, 75B 

938 DATA 11,80,98, 1A,B5, 12, 13,ED,53, 31,15, FD, 7E, 89, B4, FD, 5B7 

948 DATA 77,89, DD, 23, FD, 23,C1,95, C2, BA, 14, 9D,28, 1E,2A, AE,618 

958 DATA 14,22,FF,14,CD,26,BC, 22, AE, 14, ED, 5B, B2, 14, 7C, C6, 72C 

869 DATA 88,67,22,B2,14,ED, 53,31, 15,C3, AC, 14, 2A, AE, 14, ED, 6B1 

978 DATA 5B,B2, 14,91,59,99,ED,B8,C9, 21,96, 49,22,91,15,26,527 

988 DATA C4,22,95,15, 21,39, 19, 22,F6,15,22,8E, 16,9E,C8, DD,543 

998 DATA 21,89,49,FD,21,98,C8,AF,32,2F,19,06,59,C5, 3A,2F, 4E3 

1898 DATA 19,5F,96,92,DD,56,#8,2E,88,AF,CB,02,17,CB, 82, 17, 44F 
1819 DATA CB,92,17,CB,92,17,BB,67, 29,84, CB,25, CB, 25,CB, 25,5E4 
1829 DATA CB,25, 18,90, 7D,B3,CB,27,CB,27,CB,27,CB,27,B4,6F, 72F 
1939 DATA 5C,19,D6,C1,C5,95, 28,13, DD,56,81,AF,CB, 92, 17,CB,69A 
1849 DATA 92,17,CB,82,17,CB,92,17,BB, 28,93, 7D,B3,6F, 7B, 32,513 
1859 DATA 2F,19,FD,75,89,21, 89,89, 5E, 23, 22,F6, 15,DD, 56,98, 4B3 
1868 DATA 96,92,21,99,98,AF,4F,CB,92,17,CB,82,17,CB, 82,17, 303 
1979 DATA CB,92,17,CB,83,CB,11,CB, 83, CB, 11,CB,93,CB, 11,CB, GAD 
1888 DATA 93,CB,11,CB,24,CB,24,CB,24,CB,24,CB,25,CB,25,CB, 746 
1999 DATA 25,CB,25,B9,28,95,B4,67, 79,B5,6F,19,C8,11,98,49,59C 
1198 DATA 1A,B5, 12,13,ED,53,8E, 16,FD, 7E,98,B4, FD, 77, 89, DD, 798 
1119 DATA 23,FD,23,C1,85,C2,9D, 15, 8D,28, 1E, 2A,91,15,22,F6,5B8 
1129 DATA 15,CD,26,BC, 22,91, 15,ED,58B,95,15,FD,53,3E, 16, 7C,68E 
1138 DATA C6,89,67,22,95,15,C3,6F,15,24,91, 15, ED,5B, 95, 15, 6A2 
1148 DATA 61,59,99,ED,B9,C9,21,98,48,22,94,16,26,C9, 22, 9D, 589 
1159 DATA 16,9E,64, 11,89, 49,6B, 7A,C6,98,67,DD, 21,99,C9,96, 4B7 
1168 DATA 28,05, 1A, A6,47,17,A8,97,CB,11,97,97,CB, 11,87, 87,486 
1179 DATA CB,11,87,97,CB,11,13,23,CB,43, 29,E6, DD, 71,99, DD, 63B 
1188 DATA 23,01, 18, DD, 4D,C8,2A,94,16,7C,C6,88,67, CD, 26, BC, 6DA 
1199 DATA 22,94, 16,2A,9D, 16, CD, 26, BC, 22, D, 16,C3,93, 16, 21, 5BA 
1258 DATA 99,49,22,F8,16,26,C8,22,5C,17,22,31,17,8E, 32, 11, 39E 
1219 DATA 68,49,DD,21,89,98, DD, 19, 6B, 74, C6, 19,67, FD, 21,88,57C 
1228 DATA 18,FD, 19,96, 14,C5,96,94,C5, LA, DD, A6,88,47,17,A9,577 
1239 DATA 47,7E,FD,A6,89,4F,17, A1, A9,47,17,17,A9,C1,97,CB,6B7 
1248 DATA 11,97,97,97,97,CB, 11, 13,DD, 23,23,FD, 23, 19, D9, 79, 4C1 
1259 DATA 91,98,C9,92,83,ED, 43,31, 17,C1, 19,C9, 8D, 28, 1C, 2A, 453 
1268 DATA F6,16, 7C,C6,18,67,CD,26,BC,22,F8,16,2A,5C, 17,CD, 788 
1278 DATA 26,BC,22,5C, 17,22, 31,17,C3,EF, 16,09, 99,C9,21,98,553 
1288 DATA C9,59,E5,42,7E,9F,9F,CB, 1B,8F,9F,CB,1B,8F,8F,CB, 5A6 
1299 DATA 1B,9F,9F,CB, 1B,9F,CB,1B,69F,9F,CB, 1B,0F,9F,CB, 1B, 41C 
1398 DATA 8F,0F,CB,1B, 73,23, 18,DC,E1,8D,C8,CD, 26, BC, 18, D2, 6D5 
1319 DATA 21,98,C8,E5,C5,AF,57,5F, 4E,ED, 6F,9F, CB, 12,CB, 49, 75A 
1328 DATA CB, 12,9F,CB, 13,CB,99,CB, 13,8F,CB, 12,CB, 89, CB, 12,619 
1339 DATA 8F,CB,13,CB, 89,CB, 13, 72, 7B,ED,6F,23, 19,D7,C1,E1, 794 
1348 DATA 8D,C8,CD,26,BC, 18,CC,9E,64, 11,98, 88, DD, 21, 89, 89, 5E9 
1359 DATA 96,14,C5,1A,A6,47,17,A8,97,CB,11,97,97,CB,11,97,471 
1369 DATA 87,CB,11,97,97,CB,11,13,23,CB,43,28,E6, DD, 71,99,565 
1379 DATA DD,23,C1,18, DD, 8D,C8,EB, 21,28, 89, 19, 18,D2, 21,98, SDB 
1388 DATA 89,22,47,18,9E, 32,11,99,88,DD, 21,28, 88, DD, 19,21, 49F 
1399 DATA 59,98, 19,FD, 21,78, 89, FD, 19,46, DA, C5, 96,94, C5, LA, 4D3 
1489 DATA DD, A6,98,47,17,A8,47,7E,FD,A6,98,4F,17, A1, A9, 47, 6D7 
1419 DATA 17,17,A8,C1,87,CB,11,97,87,47,97,CB,11, 13, DD, 23, 47D 
1428 DATA 23,FD,23, 18,D9, 79,91,98,88, 92,93, ED, 43, 47,16,C1,57B 
1439 DATA 19,C9,8D,C8,FD,E5,D1, 18, B9,93,21,99, 49, DD, 21,99, 68B 
1449 DATA 89,0E,C8,96,28,E5,C5,9E, 92, LE, 98,96, 84,C5, 4E, AF, 528 
1458 DATA CB,91,17,CB,81,17,CB, 23, BA, 29,81, 1C, 19,F1,23,C1,599 
1468 DATA 9D,29,E8, DD, 73,98, DD,23,C1, 19,DB,E1, 8D, CB, CD, 26, 7BA 








1479 DATA BC,18,D9,21,99,C9, DD, 21, 89,89, 56, 14,E5,C5, DE, 92, 5D7 
1488 DATA DD,5E, 98,96, 94, AF,97,97,CB,83,38,91,B2, 19,F7,B6,578 
1499 DATA 77,23,8D,28,FE, DD, 23,C1, 19,E3,E1,9D, C8, CD, 26, BC, 7CE 
1598 DATA 18,D8,21,98,48,DD,21,98,88,5F,97,97,87,87,57,8E, 3AF 
1519 DATA CB8,96,14,E5,C5,91, 89,94, 3E,F9, A6,CB, 21, BA, 29,91,62C 
1528 DATA 9C,8E,9F,A6,CB,21,BB,28,91,8C,23,18,EB, DD, 71,89,53F 
1539 DATA DD,23,C1,19,DF,E1, 8D,C8, CD, 26, BC, 18, D4,21,99,C8, 7E2 
1549 DATA DD, 21,99,88,5F,97,97,87,97,57,96,DA,E5,C5, DD, 4E, 535 
1559 DATA 99,96,94,AF,CB,91,39,91,B2,CB, 91,39, 91,B3,B6, 77,545 
1568 DATA 23,19,F8,DD,23,C1,18,E5,E1, 5D,CB, CD, 26, BC, 18, DA, B38 
1579 DATA F3,3E, 14,32,D1,17,32,9B, 18,87,32,F9, 17,CD,98,11,5EB 
1588 DATA 3E, 93, 32,59, 18, 3A,59, 18,57, CD, 54, 18,21, 28, 89, CD, 4BB 
1599 DATA C7,17,3À,59,18,57,8E,64, CD, 93, 18, 3A, 59, 18, 3D, 32, 4E4 
1698 DATA 59,18,29,E4,91,64,28,CD,5E, 17,FB,C9,F3,3E, 28, 47, 6AB 
1619 DATA 32,98, 18,88, 32,19, 18,69, 32, 15, 18,9E, DA, 32, 1A, 18, 2BA 
1628 DATA 32,98B,18,CD,98, 11,3E, 93, 32,59, 18, 3,59, 18,57, CD, 476 
1639 DATA SA, 18,CD,FE, 17,34,59, 18,57, 8E, 32, CD, 93, 18, 34,59, SAA 
1648 DATA 18,3D, 32,59, 18,29,E7,91,32,14,CD,5E,17,FB,C9,F3,63F 
1659 DATA 3E, 9A,32,D1, 17,32, 8B, 19, 87,32, F9, 17, CD, 64, 11,3E, 597 
1668 DATA 9F,32,59, 18,34, 59, 18,57,CD,C2, 18,21, 14, 89, CD,C7, 5A4 
1679 DATA 17,34,59,18,57,8E, 64, CD, FD, 18, 34,59, 18, 3D, 32,59, 4E8 
1668 DATA 18,29,E4,91,64,28,CD,98,17,FB,C9,F3,3E, 14,47, 32, 69F 
1699 DATA 8B,18,89,32, 19,18, 89,32, 15, 18, 3E, 95, 32, 1A, 18, 32, 2B5 
1798 DATA 8B,19,CD,G6A, 11,3E,9F, 32,59, 18, 34,59, 18,57, CD, C2, 4ED 
1719 DATA 18,CD,FE, 17,3A,59, 18,57, BE, 32, CD, FD, 18, 34,59, 18, 5C9 
1728 DATA 3D,32,59,18,28,E7,91,32,14,CD,98,17,FB,C9, CD, 39,663 
1739 DATA 19,CD,6C, 19, CD, AF, 19, CD, EB, 19, 99,99, 69,99, 99,09, 4D1 
1748 DATA C3,44, 14,99, 32,43, 1A,3E,92, CD, $E, BC, 11,98, 88, CD, 46D 
1759 DATA 9B,BC,21,E7, 1B,CD, 98, 1B, 3A, 43, 1A, 21,45, 1C, 11,9D,531 
1768 DATA 99,47,95,28,93, 19, 18, FD, CD, 98, 1B,CD, 78, BB, 22, AB, 5EA 
1779 DATA 1B,34,43, 1A,FE,93, 29,13, 21,94, 19,11, AF, 1C, AF, 47,483 
1789 DATA 4E,23,ED,BS,12,21,66, 1C,CD,98,1B,21,84,91,5D,54,53A 
1798 DATA CD,6D,1B,28,8F,3A, 43, 14, FE, 83, CA, 95, 1B,CD, 96, BB, 594 
1899 DATA E1,8E,FC,C9,68B,62, CD, 75,BB, 91,43, 19,CD,69,BB,FE, 8B1 
1819 DATA 29,28,98,3E, #A, CD, 5A,BB, 8C, 19, F1, 79, 32,36, 1B,CD, 559 
1828 DATA 78,1B,CD,C7,1A,18,F8,CD,96,BB,FE,FA,CA, 23, 1B,FE, 8D3 
1839 DATA F1,CA,39,1B,FE, F2, CA, 4F, 1B,FE, F3, CA, SA, 1B,FE, 29,981 
1849 DATA 28, 1A,FE,ES,28,97,FE,FC,28,DD,E1,E1,C9, 34, 43, 14, 868 
1859 DATA FE,93,28,D3,CD,95, 1B,CD, 13, 1B, 18,93, CD, 95, 1B,CD, 6D1 
1868 DATA B9,1B,C8,E1,C9,CD, 13, 1B,CD, B9, 1B,C8,3E, 8C, BB, 28, 7BA 
1879 DATA F4,E1,C9,D5,21,9A, 19, 11,49, A9, AF, 47, 4E, 23, ED,B9, 7F3 
1888 DATA 12,D1,C9,CD,95, 1B,6B,62,2D, CD, 6D, 18, 28,99, 7A,FE, 719 
1899 DATA 91,C8,D6,14,57,2E, 89, 5D, C9, CD, 95, 1B,6B,62, 2C,CD,6A1 
1989 DATA 6D,1B,28,99, 7A,FE, 3D,C8,C6,14,57,2E, 84, 5D, C9, CD, 684 
1919 DATA 95,1B, 7A,FE,#1,C8,D6,14,57,C9,CD,95, 1B, 7A,FE, 3D, 82D 
1929 DATA C8, C6, 14,67,6B, 44,CD,6D, 1B,68,C8,54,C9, 4D, CD, 75, 7E1 
1939 DATA BB,69,CD,68,BB,FE, 29,C9, CD, A1, 1B,96, #C, CD, 69, BB, 876 
1948 DATA CD, 5A,BB, 77,23, 18,F6, 78,3E, 18,CD, 5A,BB, CD, 95, 1B, 7A7 
1959 DATA SE, 18,03, 5A,BB,CD, A1, 1B, 7E, 23, B7,C8, CD, 5A, BB, 18, 7D1 
1968 DATA F7,6B,62, CD, 75, BB, 21,98, AB,C9,21,08, 98, C3, 75, BB, 75F 
1978 DATA CD, AA, 1B,3E,FB, CD, 8C, BB, 21,49, A9, CD, C3, 19,FE, FC, 8BA 
1988 DATA 29, 9A, CD, AA, 1B,SE, 12,CD,5A,BB,AF,C9, 21,88, A9,D5,6FC 
1999 DATA 11,81,19,91,FF,9C,7E,B7, 28,44, ED, AS, 19,F8,3E,4C,5EE 
2899 DATA D1,98,C8, 32,88, 19,09, 1F,91, 19, 18,28, 45,53,59, 41,54E 
2819 DATA 43,45,29, 18,29, 34, 29,63, 68,6F, 69, 73, 69, 72, 29, 18,463 
2828 DATA 29,45,4E,54,45,52, 28, 18,28, 34,28, 76,61,6C, 69,64, 468 
2935 DATA 65,72,28,18, 29, 45,53,43, 29,18, 29, 34, 26,61,6E,6E, 3F9 
2849 DATA 75,6C,65, 72,28,6F, 75,28, 71, 75,69, 74, 74,65, 72, 2E,618 
2958 DATA 1F,91,16,4E,6F,6D, 29,64, 75,29,66,69,63,68,69,65, 4E1 
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2868 DATA 72,29, 49,25,98,43,68,61,72,67,65, 72,28, 29, 29, 34, 448 
2978 DATA 29,98,46,75,73,69,6F,6E, 6E, 65, 72,29, 3A,28, 99,53, 4A6 
2888 DATA 61,75, 76,65, 72,29, 28, 28,28, 3A, 28,20, 44, 7B, 74, 72, 4A2 
2998 DATA 75,69, 72,65,29,29, 3A,29, 99,52,65,6E,6F,6D, 6D,65, 522 
2198 DATA 72,29,29,3A,29,08,1F,91,18, 18,28, 43,4F,59,59,29, 2D7 
2119 DATA 18,28,3A,28,73,61,75,76,65, 72,29,61,76,65,63,28,597 
2128 DATA 6C,27,61,6E,63,69,65,6E,28,6E,6F,6D, 29, 34,29, 89, 4ES 
2139 DATA 99,99,06,90,09,09, 89,09, 90,99, 69,09,CD, 44, 1A,CD, 1F8 
2148 DATA 99,00,99, 00,08, 69,00, 99,089, 96, 90,00, 90,90, 69,90, 808 
2159 DATA 99,08,99,98,00,09, 80,09, 00,00,09,00,00,090,09,99, 009 
2168 DATA 99,00,09, 00,08, 99,08,99,08,90,00,90,60,90, 90,09, 808 
2178 DATA 39,09,09,00,90,00, 60,09, 60,09, 60,09,00,99,09,09,980 
2188 DATA CD, FA, 1E,21, 7D, 1E,CD, 17, 1D, CD, 33, 1D,C3, 4F, 10,81, 5EF 
2199 DATA 98,91,98,7E, LE, 6C, ÎE, 7E, 32, 12, 1D, 32, Dé, 1D, 47,3E, SDE 
2298 DATA 81,32, 11, 10,23, 22, 13, 1D,95,28,84,23,23, 19, FC, 22, 27B 
2219 DATA 15,1D,C9, 34, 12, 1D, 47,24, 13, 1D, CD, F9, 1D, 23, 23, 19, 43E 
2228 DATA F9,C9,2A, 13, 1D, 3A, 18, 10, 3D, 87, 86,88, 4F, 89, C9, CD, 4BB 
2239 DATA 42,1D,CD,E8, 1D, CD, 5A, 1D, 18,F8, CD, 89, BB, 38, 1D,96,671 
2249 DATA 39,0E,FF,08,09,98,98,0D,28,F9,19,F5,3A,8F, 1D,B7, 485 
2259 DATA 28,95, CD, E8, 1D, 18,E3, CD, F9, 1D, 18, DE, FE, F2, CA, B2,93F 
2269 DATA 1D,FE,F3,CA, CD, 1D,FE, 9D,28,97,CD,F9,1D,E1,C3,89,87B 
2279 DATA 29,FE,FC,28,84,FE, 11,29, C1,CD,F9, 1D,E1,F3, CD, 4D, 8D8 
2288 DATA 25, 21,98, 49,11, 98,C8, 4D,44,ED,B8,FB,CD, 86, BB, C3, 6D1 
2299 DATA 99,1D,CD,F9, 10, 34, 1, 1D,FE, 91, 28,97, 3D, 32, 19, 1D, 431 
2398 DATA 2B,2B,C9,3A, 12, 1D, 32, 18, 10, 2A, 15, 1D,C9,CD, F9, 1D, 4EF 
2319 DATA 34,18, 1D,FE,86,28,87,3C, 32,19, 10,23, 23,C9, SA, 11, 391 
2328 DATA 1D, 32,18, 1D,2A, 13, 1D,C9,3E, 18, CD, 5A, BB, CD, F9, 1D, 5BA 
2339 DATA AF,32,8F, 1D,3E, 18, C3, 54, BB,5E, 23,56, 2B, 1A,B7,28,536 
2348 DATA 86, CD, 54, BB, 13, 18,F6,3E, 91, 32,9F, 1D,C9, 1F, 91,86, 495 
2359 DATA 29,29,28,41,55,54, 4F,2E, 29,29, 89, 1F,0B, 96, 29, 46, 29D 
2368 DATA 49, 43,48, 49,45,52,28,29,98,1F,15,96,25,29, 29, 4D, 2DB 
2379 DATA 4F,44,45,28,29,28, 89, 1F, 1F,96, 29, 43, 4F,4E,53,55, 324 
2388 DATA 4C,54,45,52,98,1F,29, 96,28, 4D, 45, AC, 41, 4E, 47, 45, 39E 
2399 DATA 52,28,09,1F,33,96, 29,54, 52,41, 49,54, 45, 4D, 2E, 28, 34E 
2498 DATA 89,1F,3D,96,29,54,52,41,4E,53,46,45,52,54, 89, 1F, 35A 
2419 DATA 47,96,29,43,4F,55,4C, 45,55,52,53,29, 09,98, 0D, 1E, 332 
2429 DATA 1B,1E,29, 1E,37, 1E,45,1E,53,1E,61,1E,6F, LE, 1F, 15, 2E9 
2439 DATA 92,29,4F,55,54, 49, 4C,53, 29, 47,52, 41,59, 48, 49,51, 42E 
2448 DATA 55,45,53, 28,44, 45,29,54,52, 41,49,54, 45, 4D, 45, 4E, 45F 
2458 DATA 54,53,28,44,27, 49, 4D, 41, 47,45, 53, 1F, D, 94, 18, 29,359 
2468 DATA 4F,2E,47,2E,54, 2E, 49,28, 18, 28,56, 45,52, 53, 49, 4F, 3ED 
2478 DATA 4E,28,31,2E, 39,29, 29,54, 48, 4F, 4E, 47,29, 4B,55,59, 3D6 
2488 DATA 29, 4C, 49, 4D,2E, 28, 43, 4F,58,59,52, 49, 47, 48,54, 29, 429 
2499 DATA 26,43, 29,28,31, 39, 39,31, 2E,99,F3,3E, 92, CD, SE, BC, 488 
2588 DATA 91,18,18,3E,91,CD,32,BC,91,91,91, SE, 99, CD, 32, BC, 427 
2519 DATA 91,91,81,CD, 38, BC, 21,6E, 1E, 7E,B7, 28,96, CD, 5A,BB, 5D6 
2529 DATA 23,18,F6,21,91,91,9E,96,CD, 41, 1F,21,85,91,8E, 93, 3ED 
2538 DATA CD,41,1F,11,94,81,CD,57,1F,11,94,59,CD,57, 1F,FB,529 
2548 DATA C9, CD, 75, BB, 79, CD, 5A, BB, SE, OA, 96, 4E, CD, 5A, BB, 19, 83F 
2559 DATA FB,3E,96,81,C3,54,BB,91, 95,93, 6B,62, CD, 75,BB, 79, 774 
2568 DATA CD, 5A,BB, 1D,18,F4,C9,CD,98, 1D,CD, 4F, 1D, CD, 19, 1D,6E9 


OGTI2 - BAS 


18 ‘--- deuxieme partie --- 
28 ‘ 
38 MEMORY &9899-1:MODE 2:adr=k9989 





49 FOR j=1 TO 289:k=9:FOR i=8 TO 15:READ a$ 

58 POKE adr, VAL("&"+a$):k=k+PEEK(adr):adr=adrt+! 

68 NEXT i:READ b$:1F VAL("&*+b$)>k THEN 89 

78 NEXT j:SAVE'"ogti2.bin",b,49899,41289:CLS:END 

88 CLS:PRINT "ligne : ";jx19+99;" incorrecte" :END 

98 

198 DATA 21,89,19,46,23,11,99,98,C9,CD,F2,28,3E,91,CD, 48,527 
119 DATA 14, CD, 9D, 25, CD, 98,28, SA, DC, 29,FE, 4F, 28, 8F, CD, 77, 68D 
128 DATA BC, D2,67,29,21,99,C9, CD, B3, BC, C3, 7A, BC, CD, 77, BC, 8FB 
139 DATA D2,67,28,EB,98,09,CD, 27,28, 2A,C1, 19, CD, 1E, 89,C3,691 
148 DATA DD, 24, CD, 8F,21,3E, 93, CD, 49, 1A, CD, #8, 28, CD, 8C, BC, 668 
159 DATA D2, 79, 29,21,88,49,11,08,49,91,00,90,3E, 42, CD, 98, 3BA 
168 DATA BC, D2, 79, 29,03, 8F,BC, CD, 7D, BC, CD, 96, BB, SE, FC, C9,9C3 
178 DATA CD, 92, BC, CD, 96, BB, 3E, FC, C9, CD, F2, 29,3E, 84, CD, 49, BDA 
189 DATA 14,34, 89, 19, 32, 9C, 29, 21,97,28, CD, D4, BC, D8,3E, 81,616 
199 DATA DD, 21,94, 29,C3, 18,98, 45,52,C1,9C,28,8C,81,19,CD,614 
288 DATA F2, 29,3E, 85, CD, 49, 1, 34,89, 19,32, DB,28,21,81,19,525 
219 DATA 11,6E,19,4F,96, 99, ED, B8,21,E1, 28, CD, 68, 14, 3A, 89, 5CC 
229 DATA 18,32, DE, 29,21, D4, 29, CD, D4, BC, DS, 8€, 92,DD,21,D7, 797 
238 DATA 28,03, 1B, 88,52, 45, CE, DE, 28, DE, 28, 0, 8E, 19, 8C, 81,593 
249 DATA 18,80, 94,4E,6F, 75, 76,65,61,75,29,6E,6F,6D,28,3A, 4CE 
258 DATA 28, 09,3E, 82,CD, 9E, BC, 21, 2C, 21,84, C8, 29,FE, 41,28, 4EF 
268 DATA 81,23,CD, D4, BC, 39,84, AF,C3,1B,98,E1,3E,FC,C9,3E, 764 
278 DATA 92, CD,6E, BC, 21,20, 21,3, CD, 29,FE, 41,28,81,23,CD,58F 
289 DATA D4, BC, 39, 84, AF, C3, 1B,99,E1,8E,FC,C9,C1,C2,21,41,81AÀ 
298 DATA 21,CD,D4, BC, 38, 92,E1,C9,3E,91,DD, 21, 44,21, C3, 1B,6E2 
390 DATA 98,44, 49, D2, 46, 21, 9C, AB, 19, CD, F2, 29,3E,92,CD,9E,584 
318 DATA BC, 11,99, 88, CD, 9B, BC, 21,65,21,CD, 38, 25, CD, 86, BB, 658 
329 DATA FE, FC, 29,E5,C9,1F,91,19, 18,29, 45,53, 43,28, 18,28,56C 
338 DATA 34, 29,71, 75,69, 74, 74,65, 72,2E,99,CD, F2, 29, 3E, 92, 5B5 
349 DATA CD, BE, BC, CD, 2E, 21,21, A7,19,11,98, AB, AF,47,4E,23,5A3 
359 DATA ED, B9, 12,21,14,91,CD, 75,BB,21,98, AG, CD, C3, 19,FE, 741 
369 DATA FC, CB, 21,89, A9,11,A8,19,91,FF,9C,7E,B7,28,86,ED, GAA 
378 DATA AS, 19,F8,18,C6,3E, 90,98, 28, D9, SE, 29, 77, 19,FB, 18,659 
388 DATA BA, 89,89, 89,09,19,91,C9,21,95,B5, 19, CD,F2,28,3E, 49C 
398 DATA 92, CD,9E, BC, 21,E7,29,11,B7,19,91,93, 98, ED, B9,21,564 
488 DATA 41,21,CD, D4, BC, DS, 8E, 81,DD,21,C7,21,CD, 1B,98, 11, 6AD 
419 DATA 88,05,0E, 69,21,94,91,E5, CD, 75, BB, CD, 69, BB, FE, 29, 621 
429 DATA 28, 21,86, 8C, CD, 69, BB, CD, 5A, BB, 12,13, 18,F6,9C, 96,562 
439 DATA 93,3E, 29, CD, 5A, BB, 19,FB,CD,68,BB,FE, 29, 29,E3,E1, 838 
448 DATA 2C,18,D4,E1,21,0C,99,EB,ED,52,EB,21,C1,21,73,23,6D4 
459 DATA 72, 23,36, 89,23, 36,85, 23,79, 77,23, 36,81,B7,C9,CD, 4E3 
468 DATA CC, 21,C8,21,E3, 2C, 11,64, 18,91,993, 80, ED,B8,C3,6D,601 
478 DATA 25,CD,F2, 29,96, 8C, 2A, C3,21, 11, 88,88, CD, 17,29,C3,594 
489 DATA C3,24,CD,C3, 24, 2A,C3,21,11,81,19,91,98,98,ED,B8,5F1 
498 DATA CD,9F,21,86,0C,21,81,18,11,99, 98, CD, 4D, 29, 2A,C3, 491 
588 DATA 21,81, 8C, 89,99, 22,C3,21,C9,CD, CC, 21,C8,3A,C5,21,5AB 
518 DATA 32, E4, 22, CD, 9D, 25,46, 0C, 2A,C3,21, 11, 99,88, CD, 17,454 
529 DATA 28, CD, A6,22,18,F,CD, 96,BB,FE, F2, CA,B9,22,FE,F3,9D1 
534 DATA CA, DD, 22,FE, FC, 28,EF,E1,C9,2A, C3, 21, 34, C6, 21,FE, 9A9 
548 DATA 81,28, 8D, 30, 32, C6, 21, 81,9C, 98, ED, 42,22,C3,21,C9, 497 
559 DATA 3A,C5,21, 32,C6,21, 2A, Ci, 21,22,C3,21,C9, 24, C3, 21,622 
568 DATA 34, C6,21,FE, 19,28, 90, 3C, 32, C6, 21,91,9C, 98,99, 22, 3F9 
579 DATA C3, 21,C9,3E,91,32,C6,21,21,98,85,22,C3,21,C9,3A,534 
589 DATA DC, 29,FE, 4F, 28, 26, 21, 8F, 23, CD, 39, 25,C3, 96, BB, LA, 5B3 
598 DATA 14,3C, 14, 19,43,6F,6D, 79,61,63, 74, 29,6E,6F,6E, 29, 4CF 
688 DATA 73,7B,6C,65,63, 74,69,6F,6E, GE, 7B,98,CD,3F,22,CD,6C8 
618 DATA 51, 22,CD, 62,22, 3A,C5, 21, 3D, 32,05, 21,29, F1, C9, 3A, 64D 
629 DATA 28,19,87,29,8C, CD, 9D,25,CD,DB, 24, CD, DE, 11,C3,BB, 715 
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639 DATA 24,CD,55,24,C8,CD,3F,22,CD,51,22, CD, DE, 11, CD, 62, 78B 
649 DATA 22,3A,C5,21,3D, 32,C5,21,29,EE,C9, CD, 9D,25,CD, DS, 78A 
658 DATA 24,CD,93,13,03,C3,24,3A, 28, 19,B7, 28,899, CD, 8D, 25, 592 
669 DATA CD, AG, 23,C3,BB, 24,CD,55,24,C8,CD, 3F,22,CD,51, 22, 7AË 
678 DATA CD, A9,23,CD,62,22,3A,C5,21,3D, 32,C5,21,28,EE, C9, 72D 
689 DATA 34,29,19,F5,CD,8E,BC,F1,FE, #2, 28,99,FE, 91,28, 08,653 
699 DATA FE, 99,28, 13,C9,F3,CD,83,14,FB,C9,F3,CD, 89,11, CD, B3B 
789 DATA 96,14,CD,35,11,FB,C9,F3,CD,6A, 11, CD, 79,15,CD, A4, 888 
719 DATA 11,FB,C9, 34,28, 19,B7,28,89,CD, 8D, 25, CD, FC, 23, C3, 6D5 
729 DATA BB,24,CD,55,24,C8,CD, 3F,22,CD,51,22,CD, FC, 23,CD, 814 
739 DATA 62,22,3A,C5,21,3D,32,C5,21,28,EE, C9, 34, 29, 19,F5,638 
749 DATA CD,BE, BC, F1,FE, 92, CA, 86, 16,FE,91,CA, 38, 19,FE,98,7FE 
759 DATA CA, AF,19,C9,3A,28,18,B7,28,89,CD, D, 25, CD, 3D, 24, SDA 
769 DATA C3,BB,24,CD,55, 24,C8, CD, 3F,22,CD,51,22,CD, 3D, 24, 74C 
778 DATA CD, 62,22, 3A,05,21,3D, 32,05,21,28,FE, C9, 34, 20, 19,618 
780 DATA F5,CD,8E,BC,Fi,FE, 92, CA,DF,16,FE,#1,CA,6C, 19,FE, 988 
798 DATA 98,CA,EB, 19,09, 3A,C8,29,21, CD, 29, BE, C9, 21,68, 24,6FC 
889 DATA CD, 39,25, CD, 86, BB, AF, C9, 1A,9F, 4B, 14, 19,45,6E, 28, 59C 
819 DATA 61,75,74,6F,6D,61,74,69,71, 75,65, 2C, 29,69, 6C, 29,5F4 
829 DATA 66,61,75,74,29,32,29,6C,65,63, 74,65, 75, 72, 73,28,5A9 
839 DATA 64,65,29,64,69, 73,71,75,65, 74, 74,65, 73, 2E, BD, ZA, 579 
849 DATA 53,69,6E,6F,6E, 2C, 14, 75, 74,69,6C, 69, 73,65, 7A, 28,5E9 
854 DATA 65,6E,28,6D,61,6E, 75,65,6C,2E,98,3E, 87, CD, 5A, BB, 5CA 
869 DATA CD,86,BB,F3,21,09, C8, 11,99, 49, 4B, 42,ED,BB,FB,C9, 7A1 
878 DATA 99,21,99,49,11,99,C8, 4D,44,ED, B5,99,C9, DD, 21,D8,5F7 
889 DATA 19,81,98,19,C5, 79, CD, 35, RC, DD, 79, 8, DD, 23,C1,8C,637 
898 DATA 18, F2,CD, 3B,BC,DD, 78,88, CD, 11, BC, 32, 29, 19, BE, 94, 62A 
988 DATA B7,28,85,CB, 39, 3D, 28, FB, 79, 32, 14, 19,C9, 3A, 29, 19, 54B 
918 DATA CD, SE, BC, DD,21,D8,19,91,68, 19,05, 79, DD, 46, 89, 48, 62F 
928 DATA CD,32,BC, DD, 23,C1,8C, 19,F1,DD, 46, 69, 48,C3,38, BC, 7AB 
938 DATA 7E,B7,C8,CD,5A,BB,23,18,F7,CD, 89,28, CD, 17, 29, CD, 7D8 
948 DATA 42,29,CD, 79,29, CD, 9F, 29, CD, 49,21, CD, 7B,21,CD, 89, 74A 
958 DATA 22,CD,3F,23,CD, 68,23, CD, 77,23,CD,D3, 23, CD, 14, 24, 6DB 
968 DATA CD,FF,22,CD,F2, 29, CD, 9F,21,CD,C3,24,CD, DB, 24, CD, 98C 
978 DATA F8,24,CD, 8D,25,68,09,09,96,09,86,00,80,00,00,09,21B 
982 DATA 99,90,89, 00,99, 69,00,06,09, 00,09, 80,08, 00,06, 08,009 
999 DATA 98,99,00,69,08,00,96,99,66,09,90, 09,80, 00,89, 09, 009 
1998 DATA 09,09,06,06,98,00,08, 08,09, 98,90,90, 00,80, 00,09, 098 
1919 DATA 99,99,96,00, 09,00, 60,09, 90,99, 00,09, 09,09, 00,09, 009 
1925 DATA 609, 00,06, 05,09, 00,09, 00,08, 06,00,00,60,09,99,99,006 
1939 DATA 96,00,606,00,99,00, 80,09, 00,09, 00,09,00,00,00,00, 060 
1849 DATA 99,00,09,00,06,00,08,00,09,09,00,00,99, 00, 90,99, 909 
1959 DATA 69,09,90,09, 89,09, 90,00, 90, 09, 00,09, 00,09, 08,49, 000 
1868 DATA CD,F2,28,8E, 92, CD, 48, 1A,CD, 8D, 25,CD, 88, 28,CD, 17,616 
1979 DATA 28,CD,23,26,CD,96, BB,FE, 26, 28,F6,FE, FC,C8,FE, 4D, BCD 
1889 DATA 29,EF,C9,3A, 2A, 18,FE,91,CA,36,26,FE, 82, CA, 47, 26, 6AB 
1998 DATA FE,93,CA,58,26,C9,21,98,C9, 11, 89,49, 1A, A6, 77,23,59E 
1198 DATA 13, 7A,FE, 88,28,F6,C9,21,99,C8,11,88, 48, LA, B6, 77,663 
1118 DATA 23,13, 7A,FE,89,28,F6,C9, 21,99, C9, 11, 09,48, 1A, AE, 687 
1129 DATA 77,23, 13, 7A,FE, 88,28,F6,C9, CD, 99, 26,98, 98, 89,89,577 
1139 DATA 99,08,00,08, 00,09, 90,09, 69,99,00,09,18,3C, 7E,FF, 1D1 
1149 DATA 18,18,18,18, 18, 18,18, 18,FF, 7E, 3C, 18, 18,39, 79,FF, 448 
1159 DATA FF,79,39,19,88,0C,0E,FF,FF,0E, 8C, 98, 09,98, 18, 3C, 445 
1168 DATA TE,FF,FF,99,98,09,FF,FF,7E,3C, 18,28,88,E0,F8,FE, BA2 
1179 DATA F6,E8,69,09,92,9E, 3E,FE, 3E, SE, 92, 99, 38, 38,92, 7C,578 
1188 DATA 19,28,28,28,38,38, 19,FE, 19, 28, 44, 82, 38, 38, 12, 7C, 492 
1199 DATA 96,28, 24,22, 38,38,99, 7C, 12, 28, 48, 88, 99, 3C, 18, 3C, 414 
1298 DATA 3C,3C,18,98,3C,FF,FF, 18,0, 18,38, 18,18, 3C, 7E, 18, 438 
1219 DATA 18,7E,3C, 18,99,24,66,FF,66, 24, 09,09, 69,00,07, 09,304 
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1228 DATA 99,09,09,90,98,00,98,09,68, 00,00, 08, 90, 80,60, 90,800 
1239 DATA 08,09,00,09, 90,00, 60,09, 60,09, 60,00,00,09,00,90, 008 
124$ DATA 69,99,06,90,08,09,08,00,98,00,00,08, 60,00, 00, 89,099 
1259 DATA 90,09,90,90, 89,00, 00,09, 89,09, 00,09,00,99,00, 08,000 
1268 DATA 99,09,09,08,98,96,086,69,68, 00,96, 00, 90, 00,80, 89,909 
1279 DATA 89,08,09,09,99,00, 80,09, 60,09, 060,09,00,09,00,08,060 
1288 DATA 99,06,66,08,08,09,08,09,98, 08, 90,00, 59, 00,90, 00,009 
1299 DATA 98,99,96,09,90,08, 60,08, 60,09,99,09,09,05,00,09,900 
1388 DATA 89,09,08,09,09,08,90,60,09, 09,90, 08, 86, 00,00, 89,099 
1319 DATA 86,69,89,00, 60,99, 80,09,66,09, 00,09, 00,00,00,09,900 
1328 DATA 99,06,06,90,00,09,08,00,08, 00,99, 00,96, 00,90, 00,099 
1339 DATA 89,99,99,09, 90,09, 90,09, 00,09,99,09, 00,99, 00,09, 000 
1349 DATA 99,99,99,60,08,08,08, 00,09, 00, 99,00,60, 09, 00,99, 009 
1359 DATA 99,99,00,09, 89,09, 80,09, 00,09,00,09,00,05,00, 09,090 
1368 DATA 99,09,06,08,09,00,08,09,68, 00,00, 00, 90, 99,80, 09,069 
1379 DATA 99,99,09,09, 90,09, 90,99, 00,09,90,09,00,90,09,08,990 
1388 DATA 99,01,99,00,98,08,9B,3E,91, 11,99,28,12, 13,12, 13, 9C3 
1399 DATA 7E,32,97,28, ED, A, 22,93, 28, CD, EC, 28, 22,95, 28,C9,642 
1499 DATA CD,66, BB, 3A, 92, 28, 47, 2A,93, 28,CD, DB, 28, 23,23, 19,514 
1419 DATA F9,2A,93,28, 34,99, 28,CD, EC, 28, CD, AA, 28, CD, 42, 28,667 
1429 DATA 18,F6,CD,96,BB,FE,FB,CA,75,28,FE,F1,CA, 98,28, FE, A62 
1439 DATA 8D,29,94,E1,C3,95,2B,FE,FC,28,94,FE, 11,28,E3,E1, 7AE 
1449 DATA 21,97,91,11,19,58,CD,66,BB,CD,6C, BB,81,81,49,CD,554 
1459 DATA B7,BB,C3,4F, 1D,CD, DB, 28, 34,98, 28,FE, 91, 28,97, 3D,63E 
1468 DATA 32,99, 28, 28, 2B, C9, 34, 92,28, 32,98, 28, 2A, 85,28, C9, 357 
1479 DATA CD, DB, 28,34, 89,28, FE, 96, 28,97, 3C, 32, 09, 28, 23,23, 441 
1489 DATA C9,8E, 91,32,98, 28,24, 93,28, C9,3E, 18, CD, 5A, BB, 86, 4BE 
1498 DATA 98,CD,E7,28, 1A,B7, 28, 1B, CD, 5A, BB, FE, 9D, 26, 11, 78,686 
1588 DATA B7,29,9D, 13, {A, 1B,FE, 0, 28,06,04,3E, 18, CD, 54, BB, 496 
1518 DATA 13,18,E1,78,B7,C9,3E, 18, C3,5A, BB, CD, E7, 28, 1A,B7, 7D6 
1528 DATA C8,CD,5A,BB, 13, 18,F7,5E,23,56,2B, C9, 3D, 87,86, 89,5E1 
1539 DATA 4F,99,C9,CD, 89,28, CD, 83, 28,CD, 97,28, CD, 28, 28, CD, 5EC 
1549 DATA C3, 76,28, 92, 42,29,59, 29,98, 76,29, 81,29, 8E, 29, QD, 4F8 
1558 DATA 29, A9,29,B5, 29, C2, 29, CF, 29,93, EB, 29,F3, 29, FB, 29, 713 
1568 DATA 95,93, 2A,9C, 2A, 15,2A,B5,29, C2, 29,93, 8C, 2A, 46, 2A, 349 
1579 DATA 59,2A,95,5A, 2A,6C, 2A, 7E, 2A, BA, 2A,9B, 2A, 92, AD, 24, 493 
1589 DATA C8, 2A,1F,91,91,F3,28, 4D,41,4E,55, 45,4, 8D, BA, 29, 41F 
1599 DATA 31,29, 79,61, 72,29, 31,2E, 99, 1F,91,04,29,29,41,55, 39D 
1698 DATA 54,4F,4D,41,54,49,51,55,45, 5D,9A,28,65,6E, 29, 73,456 
1619 DATA 7B,72,69,65,2E,99,1F,91,91,43, 48,41,52,47,45,52, 496 
1629 DATA 99,1F,91,92,46,55,53,49,4F, 4E, 4€, 45,52, 99, 1F,91,2FB 
1639 DATA 93,53,41,55,56,45, 47,41,52, 44, 45,52, 99, 1F, 01,94, 368 
1648 DATA 44,45,54,52,55, 49,52, 45,99, 1F,91,95,52, 45, 4E, 4F, 3BD 
1659 DATA 4D,4D,45,52,89,1F,81,97,53, 4F,55,52, 43,45,29,2E, 377 
1668 DATA 41,99, 1F,91,98,44,45,53,54, 49, 4E,29,2E, 41,99, 1F, 2DE 
1679 DATA 91,8A,43,4F,4D,59, 41,43,54,29, 3A, 29, 4E, 4F, 4E, 8D, 384 
1688 DATA 9A,29,45,58,54,28,2E,53, 43,52, 99, 1F, 81,81, 29,29, 2B2 
1699 DATA 38,28,98,1F, 91,92, 29,28, 31, 29,00, 1F,01,93,F3, 28, 239 
1788 DATA 32,29,08,1F,01,91,2E,43,41,54, 29,9, 1F, 91, 92, 2E, 1E9 
1718 DATA 44,49,52,29, 89, 1F, 81,93, 2E, 44, 45, 46, 49, 4C, 45,52, 34B 
1728 DATA 8D,A,29,6C,65, 73,28, 78,63, 72,61,6E, 73, BD, FA, 29, 464 
1739 DATA 31,28,79,61, 72,28, 31,2E, 89, 1F,91,97,1F,91,01, 29, 27B 
1748 DATA 29,41,4E,44,29,08,1F,91,93,28, 29, 4F,52, 29, 29,09, 257 
1759 DATA 1F,81,95,F3, 29,58, 4F,52, 29,09, 1F,91,01, 45,46, 46, 343 
1768 DATA 41,43,45,52,2D,58,4F, 49,4E,54,53, 99, 1F, 91, 92, 52, 309 
1778 DATA 45,59,41,52, 45,52,2D,53,54, 52, 49, 45,53,98, 1F,#1,3E6 
1788 DATA 93,43,4F,4E,54,4F,55,52,53, 98, 1F,91, 84,52, 45, 44,37F 
1799 DATA 55,43,54,45,55,52,29,31,2F, 34, 69, 1F,91,95,52, 45, 348 
1898 DATA 44,55,43,54,45,55,52,28,31,2F,31,36, 99, 1F, 91,91, 324 





1819 DATA 58,41,43,29, 2D,3E, 29,53, 43,52, 9D, 8A,64, 78,693, 6F, 42F 
1828 DATA 6D, 78,61,63, 74,65, 72,98, 1F,91,94, 43,41, 4C, 4C, 29, 44C 
1839 DATA 26,1F,97,94,2E,2E,2E, 2E, 8, 84, 64, 7B,63,6F,6D, 79, 3AD 
1849 DATA 61,63, 74,65, 72,98,21,93,29,CD,97,28,21,97,81,11,392 
1858 DATA 9B,11,C3,29, 28,21, 88,29, CD,97,28,21,97,9B,11, 11, 2CA 
1869 DATA 1B,C3,29,28,21,19,29,CD,97,28,21,87,15, 11,8B, 25, 393 
1879 DATA C3,29,28,21,29,29,CD,97,28,21,87,1F,11,11,2F,C3, 3CC 
1889 DATA 29,28, 21,2B,29,CD,97,28,21,97,29, 11,8B, 39,C3, 29, 342 
1898 DATA 28,21, 32,29, CD,97, 28, 21,87,33, 11,9B, 43,C3, 29,28, 365 
1999 DATA 21,3D,29,CD,97,28,21,97,3D, 11,8B, 4D,C3, 28, 28, BE, 36A 
1919 DATA 81,46, 23,34, 99,28, 5E, 23, 56,23, 13, 13, 13,EB, 36, 29, 349 
1928 DATA B9,29,92,36,F3,EB,9C, 19,ED, C9, 3D, 97,96, 88, 4F, 89, 563 
1939 DATA 5E,23,56,C3,16,99,81,91,99,CD,B7,BB, 3A, 18, 1D, 21,479 
1949 DATA 85,2B,C3,6A,2B,E6,2A,F5,2A, 84,28, 13,2B, 22,28, 31,522 
1958 DATA 2B, 49,28, D6, 2D, 34, 19, 1D, 21,9E, 2B, C3, 64, 2B,EE, 28, 55B 
1969 DATA AC, 2B,EA, 2C, B1,2B,9F, 2D,B6, 2B,BB,2B,21,C6,2B, 18,5F6 
1979 DATA #F,21,D6, 28, 18,94, 21,E9, 2B, 18,95,21,EA, 2B, 18,99, SEA 
1988 DATA 3A,09,28,C3,6A,2B,FE, 28,99, 2C, 14,20, 1A, 20, 24,2C,3EE 
1999 DATA 2E,2C,3E,20, 43,20, FD, 20, 83, 2D, 99, 2D, 2E, 2C, SE, 2C, 386 
2899 DATA E, 2D, 24,20, 24, 20,38, 20,36, 2D, 3C, 20,52, 2D, 34, 8, 2D5 
2919 DATA 28, 3D, 32,28, 19,21,93,29, CD, 4F, 2B,C3, 23,28, CD, 99, 447 
2829 DATA 29,FE, FC, CA, 99, 1D,C3,B3,2D, CD, 98,26,FE, FC, CA, 89, B5SB 
2939 DATA 1D,C3,BB,2D, CD, 42, 28,C3, 89, 1D, CD, 79,29,FE,FC, 28, 757 
2849 DATA F9,C3,99,1D,CD,9F,28,FE, FC, 28,F9,C3,89, 1D, 21, C9, 839 
2959 DATA 29,7E,FE, 41, 28,93, 3D, 18, 81,3, 77,C3,23,28,21,CD,516 
2869 DATA 29, 18,EE, 3A,D4, 2A,FE, 2E,28,37,11,56,2C, CD, DE, 28,658 
2979 DATA CD,86,BB,C3, 99, 1D, 1A, 14,30, 14, 19,41,64, 72,65, 73, 4F4 
2888 DATA 73,65, 29,64,65, 28,64, 78,63, 6F,6D, 79,61,63, 74,61, 698 
2999 DATA 67,65,28,6E,6F,6E, 29,69, 6E, 73, 74,61,6C,6C, 7B,65,62E 
2198 DATA 99,11,DC,29, 1A,FE,4F,28,47,21,E9,2C,81,93, 99, ED, 59A 
2119 DATA B8,11,CF,29, CD, DE, 28,21,E6, 2, 11,99, A9,ES,D5, 81, 72B 
2128 DATA 94,09, ED, B9, 21,98, 97, CD, 75,BB,E1,CD,C3,19,81,FF, 752 
2139 DATA 43,D1,7E,B7, 28,98, ED, AS, 19,F8, 18, 96, SE, 28, 12, 13,56F 
2148 DATA 19,FC, 21,E6,2C, 11,E7,29,91, 93, 99, ED, B9, C3, 23, 26, 68F 
2158 DATA 21,DD, 2C, 91, 93,99, ED, B9, 21,E3, 2C, 18,E8, 4E, 4F, 4E, 5E6 
2168 DATA 4F,55,49,53,43,52,58, 41,43, 09, 3, 89,28, 3D, 32, 29, 343 
2179 DATA 19,CD,FE, 24,21, 19,29, CD, 4F, 2B, C3, 23,28, CD, 49,21,5EÉE 
2188 DATA C3, 98, 1D, CD, 7B,21,C3,98, 1D, CD, 89,22, C3, 89, 1D, 34, 5BB 
2198 DATA 99,28, 32, 2A, 19,21, 2B, 29, CD, 4F, 2B,C3, 23,28, CD, 3F, 464 
2299 DATA 23,C3,49,1D,CD,68B,23,C3,98, 1D,CD, 77,23,C3, 89, 10,585 
2219 DATA CD,D3,23,C3,89, 1D, CD, 14,24,C3, 99, 1D, 3A, D4, 2A,FE,6BE 
2228 DATA 2E,28,96,CD,FF,22,C3,98, 1, 2A, 93, 28,CD, 989, 28, CD, 5D1 
2239 DATA AA, 28,21,D4, 2A,06, 84,E5, 48,3E, 2E, 77,23, 18,FC,E1,61B 
2248 DATA 41,11,D1, 2A, CD, B4,28,CD,96, BB, CD, AA, 2D, 4F,CD, 99, 7DD 
2258 DATA 2D,B7,28,F3,71,23,19,E9, 11,D4, 2A,21,C2, 18,9, 92,596 
2269 DATA 96,02, 14, 13,FE, 41,38, 94,D6, 37, 18,92, D6, 39, ED, 6F, 539 
2278 DATA 19,F9,2B, 00, 29,EA, C3,23,28,FE, 39, D8, FE, 34,38, 98,6CE 
2288 DATA FE, 41,D8,FE, 47,38,91,C9,AF,C9,FE,61,D8,FE, 7B, DS, A56 
2299 DATA D6,28,C9,3E, 87, CD, 5A, BB, CD, 96, BB,F3,21,98, C9, 11, 759 
2399 DATA 89,49, 4B,42,ED,B8,21,68,18, 11,9A, 19,96, 89, 4E, SC, 436 
2319 DATA ED,B9,FB,C3, 89, 1D, CD, 89, 2E, C3, 99, 1D, CD, C£,99, CD, 846 
2328 DATA CD, 99, CD, DC, 99,CD,E7,99,CD,E3,9C, CD, 95, 9B, F9, D, B54 
2339 DATA AF,32,8F, 1D,3E, 18, C3, 54, BB,5E, 23,56, 2B, 1A,B7,28,536 
2348 DATA CD, 9F, 39,21, 8A,2F,CD, 17,2E, CD, 36, 2E,C3, 53, 2E, 89, 56D 
2359 DATA 91,91,11,8B,2F, AB, 2F, 7E, 32, 12, 2E,32,C5,2E,47,8E, 441 
2368 DATA 81,32, 11,2E, 32, 19,2E, 23,22, 13,2E, 05, 26, 84, 23, 23, 1DF 
2379 DATA 19,FC,22,15,2E,C9, 3A, 12, 2E, 47, 2A, 13,2E, CD, EA, 2E,54B 
2389 DATA 23,23, 18, F9, C9, ED, 4B, 13,2E, 3A, 19, 2E, 3D, 26, 99, 6F, 4DB 
2399 DATA 29,99,C9,CD, 45, 2E, CD, D9, 2E, CD, 5E, 2E, 18,F8, CD, 49, 74E 
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2489 DATA BB, 38, 1D,96,38,9E,FF, 99,98, 99,09,0D,28,F9,19,F5,47E 
2418 DATA 3A,9F,2E,B7, 28,95, CD, D9, 2E, 18,3, CD, EA, 2, 18, DE, 785 
2429 DATA FE, F2, CA, A3,2E,FE,F3,CA,BE, 2E,FE, D, 28, BA, FE, FC, A69 
2438 DATA 28,84,FE, 11,29,C8,E1,C9, 3A,9F, 2E,B7,C4,D9,2E,E1, 7A7 
2448 DATA C3,54,38, CD, EA, 2E, SA, 18,2E,FE, 91,28, 97, 3D, 32, 19,551 
2458 DATA 2E, 28,28, C9, 34, 12, 2E, 32, 19, 2E, 2A, 15, 2E, C9, CD, EA, 524 
2469 DATA 2E, 34, 19,2E,FE, 11,28,97,3C, 32, 19,2E, 23, 23, C9, 34, 3D9 
2479 DATA 11,2E, 32, 19, 2E, 24, 13, 2E, C9,3E, 18, CD, 5A, BB, CD, EA, 5D2 
2488 DATA 2E, AF, 32, 9F, 2E, 8E, 18,C3,5A,BB,5E, 23,56, 28, 1A, B7, 54D 
2499 DATA 28,66,CD,5A,BB, 13, 18,F6, 3,91, 32,9F,2E, C9, 1F,91, 4C8 
2568 DATA 97,29, 29, 38, 29,68, 1F,96,97, 29, 29,31,29, 86, 1F,0B, 17E 
2519 DATA 97,28,26,32, 29,00, 1F,19,87,29,29,33, 20,08, 1F,91,182 
2528 DATA 8B, 26, 29,34, 29,08, 1F,96,98B, 29, 29,35, 29,80, 1F,8B, 18E 
2539 DATA 98,29, 29,36, 29,989, 1F,19,8B,29, 29,37, 29,08, 1F,91, 192 
2548 DATA 9F, 26, 29,38, 29,0, 1F,96,9F, 29,29, 39, 29,99, 1F, BB, 19E 
2558 DATA 9F,29,31,39, 29,89, 1F,19,9F,29,31,31, 29,08, 1F,91, 1Bÿ 
2569 DATA 13,29, 31,32, 29,98, 1F,96, 13,29, 31,33, 29,9, 1F, BB, 1BC 
2579 DATA 13,28,31,34,29,09,1F,19, 13,28, 31,35, 29,09, 1F,81, 1C9 
2589 DATA 17,29, 42,4F,52,44,45,52,28,98,11,FE,2E, 86, 2F, DE, 395 
2598 DATA 2F,16,2F, 1E, 2F,26, 2F, 2E, 2F,36, 2F, SE, 2F, 46, 2F, 4E, 398 
2669 DATA 2F,56,2F,5E,2F,66,2F,6E,2F, 76,2F, 7E,2F, {F,91,91,3E6 
2619 DATA 18,28,FF,29, 16,29, 3A,29,64,7B, 79,6C,61,63,65, 72,53F 
2628 DATA 9D, 9A, 18,29,45,4E,54,45,52,28, 18,28, 3A, 29,63, 66, 34À 
2638 DATA 6F,69, 73,69, 72, 90, #A, 18, 29,FE, 29, 18, 29, 3A, 20,63, 488 
2649 DATA 6F,75,6C,65, 75, 72,9D, A, 18,28, 45,4E,54, 45,52, 29, 489 
2658 DATA 18,29,3A,29,76,61,6C,69,64,65, 72,00, SA, 18,29, 45, 49D 
2668 DATA 53,43, 29, 18,28, 34,28, 71,75,69, 74, 74,65, 72, 80,F3, 549 
2679 DATA 3E,99,CD,8E, BC, CD, 13,25, 11,88, 29,0E, 04, 2E, 99, 86, 35A 
2688 DATA 94,26, 92,E5, CD, 75, BB, 78, CD, 96, BB, 7A, CD, 54, BB, CD, BDB 
2698 DATA 5A,BB,E1,7C,C6,95,67,1C, 19,E9, 7D,C6,94,6F, 9D, 28, 69C 
2788 DATA DE, AF, CD, 96, BB, 21, AD, 2F,7E,87, 28,6, CD, 5A, BB, 23, 818 
2718 DATA 18,F6,FB,C9,21,D9, 19,34, 19, 2E, 3D, 96, 99, 4F,99,5F,545 
2728 DATA 56, CD, 66,38, 18,FB,CD,96,BB,FE, F1, 28, 9D,FE, FO, 26, B94 
2739 DATA 18,FE,4D,29,F1,72,E1,C3,53,2E, 7A,FE, 1A, 28,95, 3C,6C6 
2748 DATA 57,C3,99, 39, AF,57,C3,99, 38, 7A,FE, 88, 28,85, 3D,57,6AE 
2758 DATA C3,99,39,8E, 1A,57,C3,99, 39, 7B, 42, 4A, ES, DS, FE, 19, 796 
2768 DATA 28,96, CD, 32, BC, D1,E1,C9,CD, 38,BC,D1,E1,C9, CD, 89, 96D 
2778 DATA 21,14,31,7E, 87,28, 86, CD, SA, BB, 23, 18,F6, CD, 96, BB, 664 
2788 DATA FE, 31,28,9F,FE, 32,28, 1E,FE, 33,28, 20,38€, 97, CD, 54, 5CE 
2798 DATA BB, 18,DD, 21, 2C, B3, 22, 73, 12, 23,23, 22, 76, 12,21, 3A, 4A2 
2898 DATA BD, 22, C4, 19, 18, 26, 21,97, B6, 22, 73, 12,23, 23, 22,76, 4E4 
2818 DATA 12,21,5B,BD, 22,C4, 19,18, 13,21,97,B6, 22, 73, 12,23, 4A4 
2829 DATA 23,22, 76, 12,21,5E, BD, 22, C4, 19, 18,89, 3E, 81, 32, 19, 308 
2638 DATA 1D,C3,99,1D,94,92,1F,15,85,51,55, 45, 4C,4C, 45,28, 324 
2848 DATA 45,53,54, 28, 4C, 41,29,56,45,52,53, 49, 4F, 4E, 29, 44, 443 
2859 DATA 45,29,56,4F,54,52, 45,29, 41, 4D,53,54,52,41, 44,28, 441 
2868 DATA 3F,1F,15,97,31, 29,28, 43,58, 43,29, 34,36, 34, 1F, 15, 2BC 
2878 DATA 98,32,29,28, 43,59, 43,28, 36,36, 34, 1F, 15,49, 33,29, 2B2 
2889 DATA 29,43,59,43,29,36,31,32,38, 1F,15,8B,56,4F,54,52, 371 
2898 DATA 45,28,43,48,4F,49,58, 29, 34,98, CD, B, 39,99,08,98,3E7 


OGTIS =: BAS 


18 ‘--- agsesblage des deux parties --- 
28 OPENOUT"d":NEMORY &1989-1:CLOSEOUT 


38 LOAD'ogtil.bin",&1998 
49 LOAD'ogti2.bin", &2899 
58 SAVE"ogti.bin",b,41999,42286, 41989 = 


PETITES ANNONCE 


V 


La place réservée aux petites annonces est limi- 
tée. En conséquence, celles-ci passent dans leur 
ordre d'arrivée. Par contre, les petites annonces 
farfelues sont systématiquement rejetées... De même, 
comme il est peu probable qu'il existe des “géné- 
reux donateurs” de matériels ou de logiciels, les 
petites annonces faisant appel à ces philantropes 
ne seront insérées que si la place le permet. 
Seront refusées toutes les annonces visant à ven- 
dre ou échanger des listes ou copies de logiciels 
non garantis “d'origine”, ainsi que toute annonce 
incitant au piratage. 

En conséquence, réfléchissez bien avant d'envoyer 
vos textes. Les petites annonces doivent impérati- 
vement nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un carac- 
tère par case. 

Enfin, toute annonce non accompagnée de timbres 
ne sera pas insérée. 
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+ Cherche contacts sérieux sur CPC 6128 
pour échange logiciel. TEYSSIER 3, rue 
des Mutilés du Travail, 42000 ST ETIENNE. 





e Vds Dams : 250 F. et OCP : 100 F. + jeux 
Dragon 2, Total Recall. Liste sur demande. 
Tél. entre 18 et 20h. 67.85.22.81. 





e Achète interface RS 232 pour CPC 6128. 
Tél. après 19h. (1) 47.82.59.15. 

e Recherche qui saurait adapter un disk 
dur 40 mégas sur CPC 6128 Tél. 
35.68.59.96. 








e Achète pour CPC livres Micro-Application 
n°9 à 12 et CP/M 2.2. Ph. BANNIER 5, 
vieux Moulin, 1213 ONEX Suisse. 





* Cherche contacts dans la région de Haute 
Marne pour échange de programmes sur 
disquettes de 6128. Tél. 25.01.56.43. 





e Cherche jeu d'échecs, Dams et Semword 
D7. GROSJEAN Christophe 10 bis, avenue 
du Clos 94210 LA VARENNE 





+ Vds 6128 + 1991 avec jeux programmes 
gestion PAO etc...: Le tout garanti : 3000 F 
Tél. 93.86.62.12 (répondeur). 


Vds 6128 + boîtier péritel + lect. K7 Sony 
+ Turbo Pascal 3.0 text OCP Art - Ams- 
trad 3D, etc : 3500 F. Tél. le soir au 
48.89.47.92. 





e Vds Amstrad PC 1512 2 lecteurs 360 ko 
+ 1 disque dur 20 Mo, monochrome + logi- 
ciels + doc. : 2500 F. Tél. 78.22.65.29. 





- Vds lecteur disquette 5" 1/4 Vortex + Vdos 
en Rom pour Amstrad CPC 6128 : 1000 F 
(à débattre) P. orig. = 2700 F Tél. 46.58. 
71.07. 





- Achète livre “Clés pour Amstrad" ou autre 
documentation technique sur CPC (assem- 
bleur) . Tél. 64.95.70. 49. après 20 h. 





Club jeunes roumains cherche pour CPC 
6128, souris, joystick disq. 3°, jeux, revues. 
D. MANEA B.P. 59-30, BUCAREST - 
70164 





e Distribue Fanz' démo free. Liste contre 1 
timbre à 4 F. Club Screen . DETTORI Patrick 
11, rue du Casino, 83230 BORMES. 





- Vds ouvrage Weka : Comment améliorer 
les performances de votre Amstrad CPC 





LNNMeNMe]-7A el 





LES PETITES ANNONCES ET LES MESSAGES 
Attention, vos PA seront mises sur le serveur avant la parution du joumal 


464 / 664 / 6128° 3 vol. : 300 F. Tél. (1) 
45.64.03.66. Heures bureaux. 





+ Vds CPC 464 coul. (repla) ou MP2 + 
lecteur DD1 + D7 : Turrican, R-Type... + 2 
joys + cordon : 3000 F. Gabriel , Tél. 
34.69.10.57. 





e Ch. contacts sérieux pour utilisation uti- 
litaires CPC. CHANTELET J. P., place de 
la république 03130 LE DONJON 





° Vds Amstrad (6128+) coul. neuf - 1 an + 
meuble + nbr. acces. et jeux 4000 F. + 
lect. DD1 + cass.: 1000 F. Té1.39.91.19.11 





° Donne 356 Ko de Softs en échange de 
cartes téléphone . Ecrire avant 1AR949 J. 
Claude 27, Edrouviére 38750 VIF 

e Cherche moniteur coiebt CTM 644 pour 
6128 (+ de 600 F s'abstenir), ainsi que 
D'ams et un livre d'initiation à 
l'assembleur. Vol . revues et disks avec 
prog. en tous genres (digit, music, jeux et 
utilitaires) Prix revues : 10 à 15 F. Disks : 
60 F. Appelez tous les jours sauf le di- 
manche au 64.95.15.27 




















es 








SRE 


nu 
DCE 





œo 
om 
Mettre ce coupon + ” _— à | 50 F _ une enveloppe. © 
Adresser le tout à : SORACOM - La Haie de Pan - 35170 BRUZ O 


Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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ABONNEZ-VOUS ! 





Vous désirez recevoir CPC : : 
Infos directement chez vous 
et être certain de l'avoir à dis- 
position. 


11 numéros 


253 F 


+ 88 F de port 

















Comment avoir CPC Infos : 

chez votre marchand de jour- ï::, 
naux ? 

Simple. S'il ne le reçoit pas, 
demandez-lui d'intervenir : ;: 
auprès des NMPP afin qu'il £* 
dispose du service. Pour ce: 
faire, indiquez-lui le titre CPC ‘= 
Infos, le prix 26 F et la codifi- 
cation des NMPP : M2604. 
Cette codif est inscrite dans :r 
le code barre sur la couvertu- 

















0 U je désire m'abonner à CPC infos et recevoir directement ATTENTION ! 
3 Chez moi 11 numéros au prix de 253 F + 88 F de port. SEUL CE BULLETIN 
D'ABONNEMENT 
Nom: __ Prénom: EST VALABLE 
Adresse : 
NOUVEAU ! 
Code postal : Ville : NAN 
VOTRE 








CARTE 
BANCAIRE 


Date : Signature 
obligatoire 








CPC N° 38 


Je règle 341 Fpar Qchèque C mandat 


Q carte bancaire Date d'expiration 


e Les abonnements ne sont pas rétroactifs 





e Envol par avion, nous consulter. | ati li ff | | | FR ee EN Lil 


Envoyez votre bulletin accompagné du règlement à : Editions SORACOM - Service abonnement - BP 88 - 35170 BRUZ 
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LES NOUVEAUX PIN'S 














MEGA 30 FF PC 30FF 
+ port 4 FF + port 4 FF 
réf : SRCPINO1 réf : SRCPINO3 





rie des 5 bin’ S 


O F FF + port 7 FF \N 










FANZINES 30 FF CPC 30 FF 
+ port 4FF | + port 4 FF 
réf : SRCPINO4 Voir bon de commande SORACOM  téf : SRCPINOS 











s RS EE MA ee 
d ARTE LRU VAN 207 A 
FRE L k”- : x 6 
de 2 M ta V Re Ë + 
EE OS 4 Le, Se 
SRE + A # j h 
RUES D TN RS TEL < REA Fu 


Des centaines de logiciels pour CPC à télécharger 
avec le kit ARCADES. 








Voir bon de commande page 45 | 





PES V2 


— 
à) R è | 
es £ S 
> 7 
BE 














CD Er por 
$F. 310.540. 95 F + port j 
155 F + port 
À 
Gr 
à LS Age PET OL 
175 F + port 160 F + port 
= 
| > 
Pro À & és LL 
LATE 102 F + port 190 F + port 
À = + | BA Module serrure 
i ie 155 F + port sé _ (bien indiquer la boîte) 
me Ts — 
| Nouveau ! les mêmes en noir 











Port + 25 F par article 
Voir bon de commande page :5 


port + 40 F par article pour l'étranger 





